Factors of an integer: Difference between revisions
m
→{{Header|Haskell}}
m (→{{Header|Haskell}}: (adjusted a name)) |
|||
Line 1,809:
| otherwise =
lows ++
(
(if intSquared
then tail -- Cofactor of square root would be redundant
else id)▼
where
(intSquared, lows) =
Line 1,819 ⟶ 1,820:
main :: IO ()
main = print $ integerFactors
{{Out}}
|