main = getLine >>= putStrLn . (\[h,w] -> if h > w then "TATE" else "YOKO") . map (read :: String -> Int) . words