Supplementing Generated Ada

Supplementing Generated Ada