インテル® Fortran コンパイラー 19.0 デベロッパー・ガイドおよびリファレンス
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()