main = do
	cs <- getLine
	let ns = toIntList cs
	putStrLn $ showAnswer (ns !! 0) (ns !! 1)

toIntList :: String -> [Integer]
toIntList = map read . words

showAnswer :: Integer -> Integer -> String
showAnswer a b
	| a == b = "a == b"
	| a < b = "a < b"
	| a > b = "a > b"
