if leap(1996)then
    print "leap"
else
    print "ordinary"
end if
wait

function leap(n)
    leap=date$("2/29/";n)
end function