set $AddBlankLines 0
SET $Latitude "45.42055556"
SET $Longitude "-75.68944444"
banner %

set d '2011-01-01'
set x adawn(d)
if x < 5:53 || x > 5:57
    REM MSG adawn() is inaccurate! - [x]
endif

set x dawn(d)
if x < 7:06 || x > 7:10
    REM MSG dawn() is inaccurate! - [x]
endif

set x sunrise(d)
if x < 7:40 || x > 7:44
    REM MSG sunrise() is inaccurate! - [x]
endif

set x sunset(d)
if x < 16:28 || x > 16:32
    REM MSG sunset() is inaccurate! - [x]
endif

set x dusk(d)
if x < 17:02 || x > 17:06
    REM MSG dusk() is inaccurate! - [x]
endif

set x adusk(d)
if x < 18:15 || x > 18:19
    REM MSG adusk() is inaccurate! - [x]
endif

set x moonrise(d)
if x < '2011-01-01@5:14' || x > '2011-01-01@5:18'
    REM MSG moonrise() is inaccurate! - [x]
endif

set x moonset(d)
if x < '2011-01-01@13:59' || x > '2011-01-01@14:03'
    REM MSG moonset() is inaccurate! - [x]
endif

set x moonphase(d, 0:00)
if x < 319 || x > 323
    REM MSG moonphase() is inaccurate! - [x]
endif

set x moondatetime(0, d, 0:00)
if x < '2011-01-04@04:02' || x > '2011-01-04@04:06'
    REM MSG moondatetime(0) is inaccurate! - [x]
endif

set x moondatetime(1, d, 0:00)
if x < '2011-01-12@06:31' || x > '2011-01-12@06:35'
    REM MSG moondatetime(1) is inaccurate! - [x]
endif

set x moondatetime(2, d, 0:00)
if x < '2011-01-19@16:20' || x > '2011-01-19@16:24'
    REM MSG moondatetime(2) is inaccurate! - [x]
endif

set x moondatetime(3, d, 0:00)
if x < '2011-01-26@07:57' || x > '2011-01-26@08:01'
    REM MSG moondatetime(3) is inaccurate! - [x]
endif

set x soleq(0, 2011)
if x < '2011-03-20@19:18' || x > '2011-03-20@19:22'
    REM MSG soleq(0) is inaccurate! - [x]
endif

set x soleq(1, 2011)
if x < '2011-06-21@13:14' || x > '2011-06-21@13:18'
    REM MSG soleq(1) is inaccurate! - [x]
endif

set x soleq(2, 2011)
if x < '2011-09-23@05:02' || x > '2011-09-23@05:06'
    REM MSG soleq(2) is inaccurate! - [x]
endif

set x soleq(3, 2011)
if x < '2011-12-22@00:28' || x > '2011-12-22@00:32'
    REM MSG soleq(3) is inaccurate! - [x]
endif


if $NumTrig == 0
    REM MSG All astronomical functions look OK
endif
