Faulhaber's formula: Difference between revisions

→‎Haskell – Bernouilli polynomials: Reduced the faulhaber function to a (slightly clearer ?) gist
(→‎{{header|Haskell}}: Reverted to a scanl version – does make more sense, I think)
(→‎Haskell – Bernouilli polynomials: Reduced the faulhaber function to a (slightly clearer ?) gist)
Line 95:
scanl
(\rs n ->
let xs = zipWith (\nd(*) i ->. (n % i * nd) rs) [2 ..] rs
in 1 - sum xs : xs)
[] .
9,655

edits