Bueno, nada del otro mundo , pero como hay poco code Haskell
es bueno publicarlo aunque nadie comente u_u
import Data.List
impares :: ([Int])
impares = do
let numbers = [1..100]
[c| c <- numbers, odd c]
main = do
let salida_pares=map(+1)impares
putStrLn("Pares:"++show(salida_pares))
let salida_impares=impares
putStrLn("Impares:"++show(salida_impares))
La forma que lo hice es diferente. No usé el "X mod 2 == 0"
Solo obtuve los impares del 1 al 100 y luego sumandole 1( con map(+1) ) a
cada elemento, lógicamente quedan los pares...
De todas formas, si alguien busca como sacar los pares de la manera "limpia"
import Data.List
pares = do
let numeros=[1..100]
[pares | pares <- numeros, pares `mod` 2 == 0]
main = do
let pares_salida = pares
print pares_salida
Saludos.
Excelente iniciación con Haskell compañero, sigue así!