main :: IO ()
main = putStrLn . map f . reverse =<< getLine
f :: Char -> Char
f '>' = '<'
f _   = '>'