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