2 lines
52 B
Haskell
2 lines
52 B
Haskell
|
approx f xs ws = sum [w * f x | (x,w) <- zip xs ws]
|