getUltimaUnaccented :: Accent -> UltimaUnaccented
getUltimaUnaccented AccentAcuteUltima = UltimaAccented
getUltimaUnaccented :: Accent -> UltimaUnaccented
getUltimaUnaccented AccentAcuteUltima = UltimaAccented
getUltimaUnaccented AccentAcuteUltima = UltimaAccented