(port-map(rec,x(print x" is "(if(>(fmod x(if(>(fmod x 50)0)4 16))0)"not """)"a leap year."))read)