let _ =
	read_line ()
	|> (fun n -> ["a";"i";"u";"e";"o"]
			|> List.map (fun x -> x = n)
			|> List.fold_left (fun x y -> x || y) false)
	|> (fun p ->
		if p
		then print_string "vowel"
		else print_string "constant"
		)
