Edición de «Práctica 1 (Paradigmas)»
De Cuba-Wiki
Puedes deshacer la edición. Antes de deshacer la edición, comprueba la siguiente comparación para verificar que realmente es lo que quieres hacer, y entonces publica los cambios para así efectuar la reversión.
Revisión actual | Tu texto | ||
Línea 57: | Línea 57: | ||
== Ejercicio 5 == | == Ejercicio 5 == | ||
primos :: [Integer] | primos :: [Integer] | ||
primos = take | primos = take 75 allPrimes | ||
allPrimes :: [Integer] | allPrimes :: [Integer] | ||
allPrimes = [x | x <- [1..], length (divisores x) == 2] | allPrimes = [x | x <- [1..], length (divisores x) == 2] |