import Control.Applicative ((<$>))
import Data.ByteString.Char8 (ByteString)
import qualified Data.ByteString.Char8 as B

f :: Char -> Char
f '>' = '<'
f '<' = '>'

main :: IO ()
main = putStrLn =<< map f . B.unpack . B.reverse <$> B.getLine