Retrieve the POS-th argument that was passed on the command line when the containing program was invoked.
This intrinsic routine is provided for backwards compatibility with GNU Fortran 77. In new code, programmers should consider the use of the GET_COMMAND_ARGUMENT — Get command line arguments intrinsic defined by the Fortran 2003 standard.
GNU extension
Subroutine
CALL GETARG(POS, VALUE)
| POS | Shall be of type INTEGER and not wider than the default integer kind; POS \geq 0
|
| VALUE | Shall be of type CHARACTER and of default kind. |
After GETARG returns, the VALUE argument holds the POSth command line argument. If VALUE cannot hold the argument, it is truncated to fit the length of VALUE. If there are less than POS arguments specified at the command line, VALUE will be filled with blanks. If POS = 0, VALUE is set to the name of the program (on systems that support this feature).
PROGRAM test_getarg
INTEGER :: i
CHARACTER(len=32) :: arg
DO i = 1, iargc()
CALL getarg(i, arg)
WRITE (*,*) arg
END DO
END PROGRAM
GNU Fortran 77 compatibility function: IARGC — Get the number of command line arguments Fortran 2003 functions and subroutines: GET_COMMAND — Get the entire command line, GET_COMMAND_ARGUMENT — Get command line arguments, COMMAND_ARGUMENT_COUNT — Get number of command line arguments
© Free Software Foundation
Licensed under the GNU Free Documentation License, Version 1.3.
https://gcc.gnu.org/onlinedocs/gcc-14.2.0/gfortran/GETARG.html