summaryrefslogtreecommitdiff
path: root/math/simpson.cpp
blob: dd887e2cc71f9a321eeea0e2677e29be1f22821e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
double f(double x) { return x; }

double simps(double a, double b) {
  return (f(a) + 4.0 * f((a + b) / 2.0) + f(b)) * (b - a) / 6.0;
}

double integrate(double a, double b) {
  double m = (a + b) / 2.0;
  double l = simps(a, m), r = simps(m, b), tot = simps(a, b);
  if (abs(l + r - tot) < EPSILON) return tot;
  return integrate(a, m) + integrate(m, b);
}