SYSTEM MODULE ProgArgs; IMPORT RTS; PROCEDURE ArgNumber*() : INTEGER; PROCEDURE GetEnvVar*(IN name : ARRAY OF CHAR; OUT valu : ARRAY OF CHAR); PROCEDURE GetArg*( num : INTEGER; OUT arg : ARRAY OF CHAR); END ProgArgs.