Returns the command that invoked the program.
Subroutine
STATUS has one of the following values:
integer len, status character(7) :: cmd call GET_COMMAND(cmd, len, status) print*, cmd print*, len print*, status end
The following is sample output the above program generates:
$ a.out a.out (followed by two spaces) 5 0 $ a.out aa a.out a 8 -1