# Define ADA Language Editing Environment # SET FIND 2; SET INS 2 Def WADA /H ENV IP IRE IEN II;H ADADEL WADA/ Def II /BR;I1;VE;R+0/ Def IP /II PROCEDURE/ Def IRE /II RETURN/ Def IEN /II END/ Def ADADEL/ENVDEF;Def IP;Def IRE;Def IEN;Def WADA/ Def ENV /ECHO ADA Language Editing Environment/ Def CMDS /WADA/