import Data.Semigroup

main = getFirst $ (First x) <> (First y)

x = putStrLn "x" >> return 42
y = putStrLn "y" >> return 1337