main=interact(\s->[d|o<-[(<),(==),(>)],d<-s,o d$head s])