Munchausen numbers: Difference between revisions
m
→{{header|Haskell}}: (pruned out one import)
m (added whitespace to the task's preamble.) |
m (→{{header|Haskell}}: (pruned out one import)) |
||
Line 997:
<pre>[1,3435]</pre>
The Haskell libraries provide a lot of flexibility – we could also
<lang haskell>import
isMunchausen :: Int -> Bool
isMunchausen =
let go = (+) .
in (==) <*> foldr go 0 . show
| |||