Function to determine if a year is a leap year

[Chris Kelleher]

<BLOCKQUOTE><font size="1" face="Arial, Verdana">code:</font><HR><pre>
function IsLeapYear log (Y as INTEGER):
return day(date(3,1,Y) - 1) = 29.
end function.

display
IsLeapYear(1996).
[/code]