Empezando por el final el símbolo ()
indica un elemento de tipo Unit
que sólo tiene un valor. Lo normal es usarlo para indicar que no nos interesa el valor que tenga o el valor que retorne una función.
Sobre lo de usar un if then else
, piensa que en haskell no se trata de una estructura, como tienen otros lenguajes, sino que es una expresión que se "evalúa". Tiene poco sentido hacer algo así:
x = if valor then True else False
Directamente, podrías asignar el valor
a x
:
x = valor
En cuanto a mejorar el código, ya que tú controlas los límites de la lista de divisores, puedes hacerlo mejor de este modo:
isPrime :: Int -> Bool
isPrime x
| x == 1 = True
| otherwise = all noDivisor [2..(x-1)]
where noDivisor y = mod x y == 0
Como la lista será vacía si el elemento de inicio es mayor que el del final, no haría falta evaluar el caso especial y reducir la función a:
isPrime :: Int -> Bool
isPrime x = all noDivisor [2..(x-1)]
where noDivisor y = mod x y == 0
O rescribirla más compacta, aunque menos legible si aún estás empezando con haskell. No te preocupes ahora si no la entiendes:
isPrime :: Int -> Bool
isPrime x = any (!=0) $ map (mod x) [2..(x-1)]
map (mod x) [2..(x-1)]
aplicaría mod x y
a todos los divisores
any (!=0)
comprobaría si en el cálculo anterior hay alguno que no haya dado cero (o sea, que divida a x
).