main@m=do x:y<-getLine;putStrLn$max(x:y)y;m