Added 'Haskell/prime.hs'

This commit is contained in:
anon 2024-07-22 19:39:19 +02:00
parent 52a3d55416
commit 81a709a7cd

13
Haskell/prime.hs Normal file
View File

@ -0,0 +1,13 @@
isprime i = [ k | k <- [2..i-1], mod i k == 0 ] == []
primes = [ n | n <- [1..], isprime n ]
-- ###
allPositive l = null [ n | n <- l, n < 0]
-- HF:
range a b
| a < b = [a..b]
| a > b = [ (+) ((-) a n) 1 | n <- [b..a]]
| otherwise = [a]