GETTIM

インテル® Fortran コンパイラー 14.0 ユーザー・リファレンス・ガイド

Portability Subroutine: Returns the time.

モジュール

USE IFPORT

CALL GETTIM (ihr, imin, isec, i100th)

ihr	(Output) INTEGER(4) or INTEGER(2). Hour (0-23).
imin	(Output) INTEGER(4) or INTEGER(2). Minute (0-59).
isec	(Output) INTEGER(4) or INTEGER(2). Second (0-59).
i100th	(Output) INTEGER(4) or INTEGER(2). Hundredths of a second (0-99).

All arguments must be of the same integer kind, that is, all must be INTEGER(2) or all must be INTEGER(4).

If INTEGER(2) arguments are passed, you must specify USE IFPORT.

See the example in GETDAT.