INTEGER FUNCTION TIME2SEC( DTIME ) INTEGER, INTENT(IN ) :: DTIME ! time interval H*MMSS
int time2secc( int dtime ) ;
DTIME
. DTIME
may be
positive or negative (in which latter case, its hour, minutes, and
seconds fields are assumed to be all negative or zero). Note
that the DTIME
H*MMSS
-encoding suffers
INTEGER
-overflow for time periods exceeding
approximately 24.5 years.
For Fortran-90 declarations and interface checking:
USE M3UTILIO
See also SEC2TIME() and SECSDIFF()
#include "iodecl3.h"
for C.
DTIME
represented
H*MMSS = 100 * ( 100 * HOURS + MINS ) + SECS
Either HOURS, MINS, SECS >= 0, or HOURS, MINS, SECS <= 0.
... USE M3UTILIO ... INTEGER SECS ... SECS = TIME2SEC( 12345 ) C Now SECS is the number of seconds in the time interval C 1 hour, 23 minutes and 45 seconds ...
... #include "iodecl3.h" ... int secs ; ... secs = time2secc( 123456 ) ; /* Now secs is the number of seconds in the time interval 12 hours 34 minutes and 56 seconds */ ...
Up: Date-Time Manipulation Routines
To: Models-3/EDSS I/O API: The Help Pages