Intel® Fortran Compiler 17.0 Developer Guide and Reference
Portability Function: Returns the process ID of the current process.
USE IFPORT
result = GETPID( )
The result type is INTEGER(4). The result is the process ID number of the current process.
USE IFPORT
INTEGER(4) istat
istat = GETPID()