$$.upto(3e3){|y|f=y/?d
g=(y%19*19+15-f/3+f-=f/4)%30
x=(f-y-y/4-g-=f/9&g/28|g/29|4)%7+g-5
puts"%02d %s, 0#{y}".%x<1?[x+31,:MARCH]:[x,:APRIL]}