import Time
m@main=getLine>>=f>>m
f x=putStrLn$x++cycle[x|x<-[" eat"," boo"],_<-x]!!fromEnum(read x::Month)