1 subroutine fs027(ivon01) 2c comment section 3c 4c fs027 5c 6c this subroutine is called by the main program fm026. the 7c subroutine argument is incremented by 1 and control returned 8c to the calling program. 9c 10c references 11c american national standard programming language fortran, 12c x3.9-1978 13c 14c section 15.6, subroutines 15c section 15.8, return statement 16c 17c test section 18c 19c subroutine subprogram 20c 21c increment argument by 1 and return to calling program. 22c 23 ivon02 = ivon01 24 ivon02 = ivon02 + 1 25 ivon01 = ivon02 26 ivon02 = 300 27 return 28 end 29