Factors of an integer: Difference between revisions
m
→{{header|Haskell}}: guards rather than if-then-else
m (→{{header|Haskell}}: guards rather than if-then-else) |
|||
Line 2,546:
<lang Haskell>integerFactors :: Int -> [Int]
integerFactors n
then []▼
((if n == square▼
▲ (reverse lows))
where
| otherwise = id
(square, lows) =
(,) . (^ 2) <*> (filter ((0 ==) . rem n) . enumFromTo 1) $
| |||