let () = let str = read_line () in let abc = ['a'; 'b'; 'c'; 'd'; 'e'; 'f'; 'g'; 'h'; 'i'; 'j'; 'k'; 'l'; 'm'; 'n'; 'o'; 'p'; 'q'; 'r'; 's'; 't'; 'u'; 'v'; 'w'; 'x'; 'y'; 'z'] in let ans = ref true in for i = 0 to String.length str - 1 do if i mod 2 = 0 && List.mem str.[i] abc || i mod 2 = 1 && str.[i] = ' ' then ans := !ans && true else ans := !ans && false done; print_endline (if !ans then "Yes" else "No")