import Data.Bool (bool) import GHC.Base (liftA2) main = getLine >>= putStrLn . (\[n, p] -> f n p) . map read . words where f = (bool "!=" "=" .) . (liftA2 (==) id . (*))