1 files changed, 151 insertions, 0 deletions
diff --git a/src/surface.cpp b/src/surface.cpp
new file mode 100644
index 0000000..e3fb061
--- /dev/null
+++ b/src/surface.cpp
@@ -0,0 +1,151 @@
+#include <iostream>
+#include <cmath>
+#include <fml/surface.h>
+
+namespace fml {
+    vec3 Plane::integrate(vec3 (*integrand)(vec3 s, vec3 dA), scalar d) const
+    {
+        vec3 sum = 0;
+
+        vec3 dA = (d * this->v1).cross(d * this->v2);
+
+        for(scalar s = 0; s < 1; s += d)
+            for(scalar t = 0; t < 1; t += d)
+            {
+                vec3 p = this->p0 + s * this->v1 + t * this->v2;
+                sum += integrand(p, dA);
+            }
+        return sum;
+    }
+
+    vec3 Disk::integrate(vec3 (*integrand)(vec3 s, vec3 dA), scalar dr) const
+    {
+        vec3 sum = 0;
+
+        scalar radius = this->radius.magnitude();
+        vec3 radnorm = this->radius.normalize();
+
+        /* chosen so that the outermost ring will consist of square area
+         * elements */
+        scalar dtheta = dr / radius;
+
+        quat rot = quat::from_angleaxis(dtheta, this->normal);
+
+        for(scalar r = 0; r < radius; r += dr)
+        {
+            vec3 s = this->center + radnorm * r;
+
+            /* area element is constant for given r */
+            vec3 dA = this->normal * r * dr * dtheta;
+
+            for(scalar theta = 0; theta < this->angle; theta += dtheta)
+            {
+                sum += integrand(s, dA);
+
+                s = s.rotateby(rot);
+            }
+        }
+
+        return sum;
+    }
+
+    vec3 Sphere::integrate(vec3 (*integrand)(vec3 s, vec3 dA), scalar d) const
+    {
+        vec3 sum = 0;
+        /*
+         * Coordinate reference (right-handed):
+         *
+         *  ^ z
+         *  |
+         *  |    ^ y
+         *  |   /
+         *  |  /
+         *  | /
+         *  |/
+         *  O---------> x
+         *
+         */
+
+        /* we will rotate this unit vector clockwise in the X-Z plane by d
+         * each outer loop (scale and offset later) */
+        vec3 rad = vec3(0, 0, 1.0);
+
+        scalar r_sq = this->radius * this->radius;
+
+        quat roty = quat::from_angleaxis(d, vec3(0, 1, 0));
+        quat rotz = quat::from_angleaxis(d, vec3(0, 0, 1));
+
+        for(scalar phi = 0; phi < M_PI; phi += d)
+        {
+            /* operate on a copy to avoid accumulating roundoff error */
+            vec3 rad2 = rad;
+
+            /* from Jacobian: dA = r^2 * sin(phi) * dphi * dtheta */
+            scalar dA = r_sq * sin(phi) * d * d;
+
+            for(scalar theta = 0; theta < 2*M_PI; theta += d)
+            {
+                sum += integrand(this->center + this->radius * rad2, dA * rad2);
+
+                /* rotate rad2 around the z axis */
+                rad2 = rad2.rotateby(rotz);
+            }
+
+            /* rotate radius clockwise around y */
+            rad = rad.rotateby(roty);
+        }
+
+        return sum;
+    }
+
+    vec3 OpenCylinder::integrate(vec3 (*integrand)(vec3 s, vec3 dA), scalar d) const
+    {
+        /*
+         * We loop along the axis length, rotating a vector around it as
+         * we go.
+         *
+         * Offset is trivial.
+         *
+         *        rad/v
+         *          ^       x
+         *         .|x     . x
+         *        . | x   .   x
+         *    O-------x-------------> axis
+         *    x   .   x   .   x   .
+         *     x .     x .     x .
+         *      x       x       x
+         *
+         */
+
+        /* TODO: normalize d so all integrals run in 1/d^n time? */
+
+        vec3 v = vec3::any_unit_normal(this->axis);
+        quat rot = quat::from_angleaxis(d, this->axis);
+
+        scalar axis_len = this->axis.magnitude();
+        vec3 norm_axis = this->axis.normalize();
+
+        vec3 sum = 0;
+
+        for(scalar l = 0; l < axis_len; l += d)
+        {
+            vec3 rad = v;
+            for(scalar theta = 0; theta < 2*M_PI; theta += d)
+            {
+                sum += integrand(this->origin + l * norm_axis + this->radius * rad, rad);
+                rad = rad.rotateby(rot);
+            }
+        }
+
+        return sum;
+    }
+
+    vec3 ClosedCylinder::integrate(vec3 (*integrand)(vec3 s, vec3 dA), scalar d) const
+    {
+        vec3 sum = OpenCylinder::integrate(integrand, d);
+
+        sum += cap1.integrate(integrand, d) + cap2.integrate(integrand, d);
+
+        return sum;
+    }
+}