Copyright (c) 1980 Regents of the University of California.
All rights reserved. The Berkeley software License Agreement
specifies the terms and conditions for redistribution.

@(#)getarg.3 4.1 (Berkeley) 05/15/85

C 4 getarg, iargc - command arguments to Fortran

 subroutine getarg( argno, string )  integer argno  character *(*) string 

 iargc() 

These procedures permit Fortran programs to access the command arguments. The integer function iargc returns the number of command arguments. The subroutine getarg stores the nth command argument in its second argument. The string is truncated or padded with blanks, in accord with the rules of Fortran character assignment.

The command go arg1 argument2

will return 2 as the value of iargc. If s is declared character\(**4, then call getarg(2, s)

will put \*(lqargu\*(rq in s.

exec(2)