import Control.Monad
main = when ("Hello" < "World") (putStrLn "Hello < World")