INTEGER FUNCTION ISDSTIME( JDATE ) INTEGER JDATE ! Julian date (YYYYDDD)
See also subroutines DAYMON(), HHMMSS(), JULIAN(), MMDDYY(), WKDAY(), and DT2STR() as well as EDSS/ Models-3 date-time manipulation programs gregdate and juldate.
... ... LOGICAL ISDSTIME INTEGER JDATE ... IF ( ISDSTIME( JDATE ) ) THEN C ...daylight savings time in effect ELSE C ...daylight savings time NOT in effect END IF ...
Up: Date-Time Manipulation Routines
To: Models-3/EDSS I/O API: The Help Pages