pxfgetpid(3F)

NAME
     PXFGETPID - Gets the process ID

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

STANDARDS
     IEEE standard interface for FORTRAN 77

DESCRIPTION
     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.

     All arguments must be of default kind unless documented otherwise.  On
     IRIX systems, 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.

NOTES
     The PXF_DEFINITIONS module can be used by Fortran 90 users to enable
     caller-callee interface checking.

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)