Intel® Fortran Compiler 16.0 User and Reference Guide
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()