Munchausen numbers: Difference between revisions

m
→‎{{header|Haskell}}: Changed a name to avoid confusion
m (→‎{{header|Haskell}}: (reformatting))
m (→‎{{header|Haskell}}: Changed a name to avoid confusion)
Line 444:
n ==
foldl
(\na c ->
let v = digitToInt c
in na + v ^ v)
0
(show n)
9,659

edits