<> <> <> MopOps: DEFINITIONS = BEGIN <> PutMopcode: PROC [Format.StringProc, CARDINAL]; GetMopcodeName: PROC [n: CARDINAL]; MopcodeValue: PROC [s: LONG STRING] RETURNS [INTEGER]; PutFopcode: PROC [Format.StringProc, CARDINAL]; AppendFopcodeName: PROC [s: LONG STRING, n: CARDINAL]; FopcodeValue: PROC [s: LONG STRING] RETURNS [INTEGER]; PutEscAlpha: PROC [Format.StringProc, CARDINAL]; AppendEscAlpha: PROC [s: LONG STRING, n: CARDINAL]; EscAlphaValue: PROC [s: LONG STRING] RETURNS [INTEGER]; PutSdName: PROC [Format.StringProc, CARDINAL]; AppendSdName: PROC [s: LONG STRING, n: CARDINAL]; SdNameValue: PROC [s: LONG STRING] RETURNS [INTEGER]; <> MopNames: PROGRAM; FopNames: PROGRAM; ESCAlphaNames: PROGRAM; SDDefsNames: PROGRAM; END.