GETPID (The GNU Fortran Compiler) (original) (raw)

program info print *, "The current process ID is ", getpid() print *, "Your numerical user ID is ", getuid() print *, "Your numerical group ID is ", getgid() end program info