-- | Upper vowels including @\'Y\'@.
upperVowelsY :: FromAscii a => (a -> t -> t) -> t -> t
upperVowelsY cons = upperVowels cons . cons (fromAscii 89 {- 'Y' -})
upperVowelsY :: FromAscii a => (a -> t -> t) -> t -> t
upperVowelsY cons = upperVowels cons . cons (fromAscii 89 {- 'Y' -})
upperVowelsY cons = upperVowels cons . cons (fromAscii 89 {- 'Y' -})