0votos

Simplificar palabras en Haskell

por josejuan hace 6 años

Normalizar a NFD, filtrar y checar.

Escribir una función que dada una cadena Unicode, devuelve una candena conviertiendo cada caracter de entrada en su homólogo ABCD...XYZ (mayúsculas y sin símbolos diacríticos).

1
2
3
4
simpleWord w = if length w == length w' then (Just w') else Nothing 
  where w' = T.unpack. T.filter (flip elem ['A'..'Z']).normalize NFD. T.pack.map toUpper $ w 
 
-- Usando: Data.Text.ICU.Normalize 

Comenta la solución

Tienes que identificarte para poder publicar tu comentario.