¿Cuál es la sintaxis para la coincidencia de patrones de una sola línea?

Question

word 0 = "Zero" 
word 1 = "One" 
word 2 = "Two" 

¿Cómo condensaría una función de coincidencia de patrones como esta en una sola línea?

Intenté word 0 = "Zero" word 1 = "One" word 2 = "Two", pero eso no funcionó.

Answer 1

utilice punto y coma:

word 0 = "Zero"; word 1 = "One"; word 2 = "Two" 

Answer 2

usted podría utilizar algo como esto:

word = (!!) ["Zero", "One", "Two"] 

No sé si será más lenta que la coincidencia de patrones, sin embargo.

Answer 3

Es un requisito extraño escribir una función en una sola línea. De todos modos, case podría ser útil allí también.

word x = case x of {0 -> "Zero"; 1 -> "One"; 2 -> "Two"} 

Answer 4

Otra posibilidad:

data Words = Zero | One | Two deriving (Show, Enum) 

word = show . (toEnum :: Int -> Words) 

o, si se quiere que funcione con tipos distintos de Int,

word = show . ((toEnum.fromIntegral) :: Integral a => a->Words)