RosettaCodeData/Task/Numerical-integration/Haskell/numerical-integration-1.hs
Ingy döt Net b83f433714 tasks a-s
2013-04-10 23:57:08 -07:00

1 line
52 B
Haskell

approx f xs ws = sum [w * f x | (x,w) <- zip xs ws]