Click above to get retro games delivered to your door ever month!

  Name:     isleap() - check if a year or date is a leap year
  Usage:    <logical> = isleap(<date>)
            <logical> = isleap(<year>)
  Params:   date type variable, or an integer equal to the year
            you want to check.

  Returns:  logical .T. if the specified year is a leap year, .F.
            if not or invalid date.

 ---------------------------------- Example ---------------------------------

                 if (isleap(date())
                      ? "This year is a leap year!"
                 endif

                 if (isleap(1980))
                      ? "1980 was a leap year...."
                 endif