let i = List.map int_of_string (Str.split (Str.regexp " ") (read_line ()));; let p x = print_string x;; if List.nth i 0 > List.nth i 1 then p "TATE" else p "YOKO" ;;