on leap_year(y)
    return year mod 4 is equal to 0 and (year mod 100 is not equal to 0 or year mod 400 is equal to 0)
end leap_year

leap_year(1900)