pxfgetpid(3F)

NAME
     PXFGETPID - Gets the process ID

SYNOPSIS
     SUBROUTINE PXFGETPID (ipid, ierror)
     INTEGER ipid, ierror

IMPLEMENTATION
     UNICOS, UNICOS/mk, and IRIX systems

STANDARDS
     IEEE standard interface for FORTRAN 77

DESCRIPTION
     On IRIX systems, this routine is in libfortran.so which is linked by
     default when compiling programs with the MIPSpro 7 Fortran 90 compiler
     or when compiling programs with the -craylibs option to the MIPSpro
     F77 compiler.

     The PXFGETPID subroutine uses the getpid(2) system call to find the
     current process ID.

     When using the CF90 compiler or MIPSpro 7 Fortran 90 compiler on
     UNICOS, UNICOS/mk, or IRIX systems, all arguments must be of default
     kind unless documented otherwise.  On UNICOS and UNICOS/mk, default
     kind is KIND=8 for integer, real, complex, and logical arguments; on
     IRIX, the default kind is KIND=4.

     The following is a list of valid arguments for this routine:

     ipid    An output integer variable that contains the process ID of the
             current process.

     ierror  An output integer variable that contains a status of zero if
             the process ID was successfully acquired.

EXAMPLES
     In this example, PXFGETPID returns the current process ID.

          program pxftest
          integer ipid, ierror
          CALL PXFGETPID(ipid, ierror)
          if (ierror .eq. 0) then
             print *,'pid = ',ipid
          else
             print *,'error = ',ierror
          endif
          end

SEE ALSO
     getpid(2)

     Application Programmer's Library Reference Manual for the printed
     version of this man page.