W3cubDocs

/GNU Fortran 7

9.123 GETCWD — Get current working directory

Description:

Get current working directory.

This intrinsic is provided in both subroutine and function forms; however, only one form can be used in any given program unit.

Standard:

GNU extension

Class:

Subroutine, function

Syntax:
CALL GETCWD(C [, STATUS])
STATUS = GETCWD(C)
Arguments:
C The type shall be CHARACTER and of default kind.
STATUS (Optional) status flag. Returns 0 on success, a system specific and nonzero error code otherwise.
Example:
PROGRAM test_getcwd
  CHARACTER(len=255) :: cwd
  CALL getcwd(cwd)
  WRITE(*,*) TRIM(cwd)
END PROGRAM
See also:

CHDIR

© Free Software Foundation
Licensed under the GNU Free Documentation License, Version 1.3.
https://gcc.gnu.org/onlinedocs/gcc-7.1.0/gfortran/GETCWD.html