HP Fortran Programmer's Reference (September 2007)

BLAS and libU77 libraries
libU77 routines
Chapter 12 651
GETLOG Retrieves the user’s login name; available as a subroutine:
SUBROUTINE GETLOG ( name )
CHARACTER(LEN=*) :: name
And as a function:
CHARACTER(LEN=*) FUNCTION GETLOG()
GETPID Returns the process ID of the current process.
INTEGER FUNCTION GETPID()
GETUID Returns the user ID of the user of the process.
INTEGER FUNCTION GETUID()
GMTIME Returns the Greenwich mean time in HP-UX format within an array of
time elements.
SUBROUTINE GMTIME ( stime , tarray )
INTEGER :: stime , tarray (9)
HOSTNM Retrieves the name of the current host.
INTEGER FUNCTION HOSTNM ( name )
CHARACTER(LEN=*) :: name
IARGC Returns the index of the last command-line argument.
INTEGER FUNCTION IARGC()
IDATE Returns the date in numerical form.
SUBROUTINE IDATE ( iarray )
INTEGER :: iarray (3)
IDATEY2K Designed to replace the HP f90 IDATE intrinsic. This returns the true year
in its third argument, as opposed to the idate intrinsic, which returns the
number of years since 1900 in its third argument.
SUBROUTEIN IDATEY2K(MONTH,DATE,YEAR)
INTEGER MONTH,DAY,YEAR
The +U77 flag (described in “+U77 option” on page 643) must be used with
IDATEY2K.
Table 12-3 libU77 routines (Continued)
Name Description and signature