pxfsleep(3F)

NAME
     PXFSLEEP - Delays process execution

SYNOPSIS
     SUBROUTINE PXFSLEEP(iseconds, isecleft, ierror)
     INTEGER iseconds, isecleft, ierror

IMPLEMENTATION
     UNICOS, UNICOS/mk, and IRIX systems

DESCRIPTION
     The PXFSLEEP subroutine waits iseconds before generating a SIGALRM
     signal.  If a previous PXFSLEEP has time remaining, isecleft contains
     the number of seconds until the signal SIGALRM would have been
     generated.

     The following is a list of arguments for this routine:

     iseconds  Default integer input variable containing the number of
               real-time seconds to wait before sending the calling process
               a SIGALRM signal.

     isecleft  Default integer output variable containing the number of
               seconds left until a previous request would have generated a
               SIGALRM signal.

     ierror    Default integer output variable containing a status of zero
               if PXFSLEEP was successful.

     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.

     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 systems, the default kind is KIND=4.

NOTES
     Replace the use of the sleep(3C) function with the subroutine call to
     PXFSLEEP().

EXAMPLES
          program pxftest
          integer iseconds, isecleft, ierror

          iseconds = 10
          isecleft = 0
          ierror = 0
          CALL PXFSLEEP(iseconds, isecleft, ierror)
          if (ierror .ne. 0) then
             print *,'FAILED: PXFSLEEP call failed with error = ',ierror
          else
             print *,'PASSED: PXFSLEEP call returned no error'
          endif
          if (isecleft .ne. 0) then
             print *,'FAILED: PXFSLEEP, isecleft not zero, =',isecleft
          endif
          end

SEE ALSO
     alarm(2)
     sleep(3C)

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