Routine ID: Z008 | |
---|---|
Author(s): A. Berglund, R. Matthews | Library: KERNLIB, CERN IBM only |
Submitter: | Submitted: 01.12.1981 |
Language: Assembler | Revised: 20.06.1985 |
OBSOLETE
Please note that this routine has been obsoleted in CNL 219. Users are
advised not to use it any longer and to replace it in older programs.
No maintenance for it will take place and it will eventually disappear.
Suggested replacement: None
TIMAL interfaces with the system of any CERN IBM-like machine to obtain the central processor time used by and remaining to the job and then converts these times to CERN IBM accounting seconds.
Currently this unit is one second of IBM 370/168-3 CPU time.
Structure:
SUBROUTINE subprograms
User Entry Names: TIMAD, PTIMAL, TIMAST,
TIMAX
External References: Machine dependent
Usage:
CALL TIMAX(T)returns execution time in CERN IBM accounting seconds used by the job so far; T is the normalised central processor time in seconds, a REAL number with fractional part.
CALL TIMAL(T)returns execution time remaining in CERN IBM accounting seconds until time-limit (user time-limits are always specified in accounting seconds); T in seconds as for TIMAX.
CALL TIMAD(T)returns execution time interval in CERN IBM accounting seconds since last call to TIMAD; T in seconds as for TIMAX.
CALL TIMAST(TLIM)This routine is necessary to initialise the timing operations in the interactive mode of VM-CMS. In other systems (including VM-CMS batch) it is a dummy do-nothing routine.
It must be called once (subsequent calls are ignored) before any calls to TIMAX and TIMAL. Before this routine is called TIMAX will return zero and TIMAL will return a multiplicative constant. TLIM is an input floating point value which will be used inside TIMAL as if it were the job time-limit in CERN IBM accounting seconds. The first call to TIMAST also establishes the time origin for subsequent calls to TIMAX and TIMAL.
Accuracy:
See the remarks in DATIME (Z007). A consequence of the 1 second resolution of TIMEL is that TIMAL has a resolution of about 8 secs on the IBM 3090.
Notes:
Machine | Constant |
IBM 168-3 | 1.0 |
Siemens 7-890 | 5.0 |
IBM 3090 | 8.0 |