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