c c FORCHECK c Global argument list verification PROGRAM Refer REAL r1, r2 READ (1,*) r2 CALL Process(r1, r2) PRINT *, r1 END SUBROUTINE Process (Arg1, Arg2) C...Arg1 is input argument, but not assigned C...Arg2 is output argument, but has been assigned REAL Arg1, Arg2 Print *, Arg1 Arg2 = 1. END

FORCHECK PC V11.18 MS5 compiler emulation 21-Jun-96 16:05:02 page: 5 ARGASG.FOR global program analysis: PROCESS, referenced in REFER, argument no 1 **[386 E] input argument was not assigned PROCESS, referenced in REFER, argument no 2 **[392 I] redundant assignment