let eto_to_int = function | "ne" -> 0 | "ushi" -> 1 | "tora" -> 2 | "u" -> 3 | "tatsu" -> 4 | "mi" -> 5 | "uma" -> 6 | "hitsuji" -> 7 | "saru" -> 8 | "tori" -> 9 | "inu" -> 10 | "i" -> 11 | _ -> assert false let () = let n = read_int () in let a = Array.init n (fun _ -> read_line ()) in let t = Array.make 12 0 in Array.iter (fun e -> let n = eto_to_int e in t.(n) <- t.(n) + 1) a; let m = Array.fold_left max 0 t in print_endline (if m <= (n + 1) / 2 then "YES" else "NO")