GET_COMMAND_ARGUMENT — Get command line arguments#
-
GET_COMMAND_ARGUMENT(NUMBER, VALUE, LENGTH, STATUS)#
Retrieve the
NUMBER
-th argument that was passed on the command line when the containing program was invoked.- Parameters
NUMBER – Shall be a scalar of type
INTEGER
and of default kind,NUMBER
geq 0VALUE – (Optional) Shall be a scalar of type
CHARACTER
and of default kind.LENGTH – (Optional) Shall be a scalar of type
INTEGER
and of default kind.STATUS – (Optional) Shall be a scalar of type
INTEGER
and of default kind.
- Returns
After
GET_COMMAND_ARGUMENT
returns, theVALUE
argument holds theNUMBER
-th command line argument. IfVALUE
cannot hold the argument, it is truncated to fit the length ofVALUE
. If there are less thanNUMBER
arguments specified at the command line,VALUE
will be filled with blanks. IfNUMBER
= 0,VALUE
is set to the name of the program (on systems that support this feature). TheLENGTH
argument contains the length of theNUMBER
-th command line argument. If the argument retrieval fails,STATUS
is a positive number; ifVALUE
contains a truncated command line argument,STATUS
is -1; and otherwise theSTATUS
is zero.
- Standard:
Fortran 2003 and later
- Class:
Subroutine
- Syntax:
CALL GET_COMMAND_ARGUMENT(NUMBER [, VALUE, LENGTH, STATUS])
- Example:
PROGRAM test_get_command_argument INTEGER :: i CHARACTER(len=32) :: arg i = 0 DO CALL get_command_argument(i, arg) IF (LEN_TRIM(arg) == 0) EXIT WRITE (*,*) TRIM(arg) i = i+1 END DO END PROGRAM
- See also:
GET_COMMAND — Get the entire command line, COMMAND_ARGUMENT_COUNT — Get number of command line arguments