pxftime

Date:: 10-20-2011

NAME

PXFTIME - Gets system time

SYNOPSIS

INTEGER itime, ierror
CALL PXFTIME(itime, ierror)

IMPLEMENTATION

Cray Linux Environment (CLE)

STANDARDS

IEEE Std 1003.9-1992 standard interface for FORTRAN 77

DESCRIPTION

The routine PXFTIME uses the time(3) function to return the number of seconds since 00:00:00 CTU (coordinated universal time), January 1, 1970 (the Epoch).

All arguments must be of default kind unless documented otherwise. Default kind is KIND=4 for integer, real, complex, and logical arguments.

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

itime: An output integer variable specifying the number of seconds since 00:00:00 UTC, January 1, 1970.
ierror: An output integer variable that contains zero if PXFTIME was successful or nonzero if PXFTIME was not successful.

EXAMPLES

In this example, PXFTIME returns the current system time in number of seconds since January 1, 1970.

       program testpxf
       integer itime, ierror
c call PXFTIME
       CALL PXFTIME(itime, ierror)
c print output arguments
       print *,'itime=',itime
       print *,'ierror=',ierror
       end