Guest User

Untitled

a guest
May 20th, 2018
141
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. integrate :: (Float -> Float) -> Float -> Float -> Float
  2. integrate f xa xb
  3.     |xb >= (xa + 0.00001) = ((f xb)*0.00001) + integrate f xa (xb - 0.00001)
  4.     |otherwise = (f xa)*0.00001
Add Comment
Please, Sign In to add comment