Find out if a date is in a leap year
──────────────────────────────────────────────────────────────────────────────
Syntax
GT_LeapYear( dDate )
Arguments:
dDate - Date to consider - defaults to current date
Returns:
.T. if the date is in a leap year
.F. otherwise
Description:
Sees if the date that is one day after Feb 28th in the given year
is Feb 29th. If it is, then we have a leap year.
Examples:
Source: LEAPYEAR.PRG
Author: Martin Colloby