6 lines
118 B
Haskell
6 lines
118 B
Haskell
fact :: Int -> [Int]
|
|
fact n = [x | x <- [1..n], n `mod` x == 0]
|
|
|
|
men :: Int -> [Int]
|
|
men n = [x | x <- [1..n], x < n]
|