02.07.2013 Views

HP Fortran Programmer's Reference

HP Fortran Programmer's Reference

HP Fortran Programmer's Reference

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

BLAS and libU77 libraries<br />

libU77 routines<br />

Table 12-3 libU77 routines (Continued)<br />

Name Description and signature<br />

ALARM Executes a subroutine after a specified time.<br />

612<br />

INTEGER FUNCTION ALARM (time, proc)<br />

INTEGER :: time<br />

EXTERNAL proc<br />

CHDIR Changes the default directory.<br />

INTEGER FUNCTION CHDIR(dir_name)<br />

CHARACTER(LEN=*) :: dir_name<br />

CHMOD Changes the mode of a file.<br />

INTEGER FUNCTION CHMOD (name,mode)<br />

CHARACTER(LEN=*) :: name, mode<br />

CTIME Converts a system time to a 24-character ASCII string.<br />

CHARACTER(LEN=*) FUNCTION CTIME (stime)<br />

INTEGER :: stime<br />

DATEY2K Designed to replace the f90 DATE instrinsic. Its function and arguments are<br />

the same as the date intrinsic’s ecept that the returned string contains a<br />

four-digit year in mm-dd-yyyy format instead of a two-digit year in<br />

mm-dd--yy format.<br />

SUBROUTINE DATEY2K(DATE)<br />

CHARACTER*11 DATE<br />

The +U77 flag (described in “+U77 option” on page 607) must be used with<br />

DATEY2K.<br />

DTIME Returns elapsed execution time since the last call to dtime or since the start<br />

of execution on the first call.<br />

REAL FUNCTION DTIME(tarray)<br />

REAL :: tarray(2)<br />

ETIME Returns the elapsed execution time, in seconds, for the calling process.<br />

REAL FUNCTION ETIME (tarray)<br />

REAL :: tarray (2)<br />

Chapter 12

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!