GEOMETRY(2)                                           GEOMETRY(2)

     NAME
          Flerp, fberp, fclamp, Pt2, Vec2, addpt2, subpt2, mulpt2,
          divpt2, lerp2, berp2, dotvec2, vec2len, normvec2, edgeptcmp,
          ptinpoly, Pt3, Vec3, addpt3, subpt3, mulpt3, divpt3, lerp3,
          berp3, dotvec3, crossvec3, vec3len, normvec3, identity,
          addm, subm, mulm, smulm, transposem, detm, tracem, minorm,
          cofactorm, adjm, invm, xform, identity3, addm3, subm3,
          mulm3, smulm3, transposem3, detm3, tracem3, minorm3,
          cofactorm3, adjm3, invm3, xform3, Quat, Quatvec, addq, subq,
          mulq, smulq, sdivq, dotq, invq, qlen, normq, slerp, qrotate,
          rframematrix, rframematrix3, rframexform, rframexform3,
          invrframexform, invrframexform3, centroid, barycoords,
          centroid3, vfmt, Vfmt, GEOMfmtinstall - computational
          geometry library

     SYNOPSIS
          #include <u.h>
          #include <libc.h>
          #include <geometry.h>

          #define DEG 0.01745329251994330    /* π/180 */

          typedef struct Point2 Point2;
          typedef struct Point3 Point3;
          typedef double Matrix[3][3];
          typedef double Matrix3[4][4];
          typedef struct Quaternion Quaternion;
          typedef struct RFrame RFrame;
          typedef struct RFrame3 RFrame3;
          typedef struct Triangle2 Triangle2;
          typedef struct Triangle3 Triangle3;

          struct Point2 {
               double x, y, w;
          };

          struct Point3 {
               double x, y, z, w;
          };

          struct Quaternion {
               double r, i, j, k;
          };

          struct RFrame {
               Point2 p;
               Point2 bx, by;
          };

          struct RFrame3 {

     Page 1                       Plan 9              (printed 1/2/25)

     GEOMETRY(2)                                           GEOMETRY(2)

               Point3 p;
               Point3 bx, by, bz;
          };

          struct Triangle2
          {
               Point2 p0, p1, p2;
          };

          struct Triangle3 {
               Point3 p0, p1, p2;
          };

          /* utils */
          double flerp(double a, double b, double t)
          double fberp(double a, double b, double c, Point3 bc)
          double fclamp(double n, double min, double max)

          /* Point2 */
          Point2 Pt2(double x, double y, double w)
          Point2 Vec2(double x, double y)
          Point2 addpt2(Point2 a, Point2 b)
          Point2 subpt2(Point2 a, Point2 b)
          Point2 mulpt2(Point2 p, double s)
          Point2 divpt2(Point2 p, double s)
          Point2 lerp2(Point2 a, Point2 b, double t)
          Point2 berp2(Point2 a, Point2 b, Point2 c, Point3 bc)
          double dotvec2(Point2 a, Point2 b)
          double vec2len(Point2 v)
          Point2 normvec2(Point2 v)
          int edgeptcmp(Point2 e0, Point2 e1, Point2 p)
          int ptinpoly(Point2 p, Point2 *pts, ulong npts)

          /* Point3 */
          Point3 Pt3(double x, double y, double z, double w)
          Point3 Vec3(double x, double y, double z)
          Point3 addpt3(Point3 a, Point3 b)
          Point3 subpt3(Point3 a, Point3 b)
          Point3 mulpt3(Point3 p, double s)
          Point3 divpt3(Point3 p, double s)
          Point3 lerp3(Point3 a, Point3 b, double t)
          Point3 berp3(Point3 a, Point3 b, Point3 c, Point3 bc)
          double dotvec3(Point3 a, Point3 b)
          Point3 crossvec3(Point3 a, Point3 b)
          double vec3len(Point3 v)
          Point3 normvec3(Point3 v)
          int lineXsphere(Point3 *rp, Point3 p0, Point3 p1,
                    Point3 c, double rad, int isaray)
          int ptincylinder(Point3 p, Point3 p0, Point3 p1, double r)
          int ptincone(Point3 p, Point3 p0, Point3 p1, double br)

          /* Matrix */

     Page 2                       Plan 9              (printed 1/2/25)

     GEOMETRY(2)                                           GEOMETRY(2)

          void identity(Matrix m)
          void addm(Matrix a, Matrix b)
          void subm(Matrix a, Matrix b)
          void mulm(Matrix a, Matrix b)
          void smulm(Matrix m, double s)
          void transposem(Matrix m)
          double detm(Matrix m)
          double tracem(Matrix m)
          double minorm(Matrix m, int row, int col)
          double cofactorm(Matrix m, int row, int col)
          void adjm(Matrix m)
          void invm(Matrix m)
          Point2 xform(Point2 p, Matrix m)

          /* Matrix3 */
          void identity3(Matrix3 m)
          void addm3(Matrix3 a, Matrix3 b)
          void subm3(Matrix3 a, Matrix3 b)
          void mulm3(Matrix3 a, Matrix3 b)
          void smulm3(Matrix3 m, double s)
          void transposem3(Matrix3 m)
          double detm3(Matrix3 m)
          double tracem3(Matrix3 m)
          double minorm3(Matrix3 m, int row, int col)
          double cofactorm3(Matrix3 m, int row, int col)
          void adjm3(Matrix3 m)
          void invm3(Matrix3 m)
          Point3 xform3(Point3 p, Matrix3 m)

          /* Quaternion */
          Quaternion Quat(double r, double i, double j, double k)
          Quaternion Quatvec(double r, Point3 v)
          Quaternion addq(Quaternion a, Quaternion b)
          Quaternion subq(Quaternion a, Quaternion b)
          Quaternion mulq(Quaternion q, Quaternion r)
          Quaternion smulq(Quaternion q, double s)
          Quaternion sdivq(Quaternion q, double s)
          double dotq(Quaternion q, Quaternion r)
          Quaternion invq(Quaternion q)
          double qlen(Quaternion q)
          Quaternion normq(Quaternion q)
          Quaternion slerp(Quaternion q, Quaternion r, double t)
          Quaternion qsandwich(Quaternion q, Quaternion r)
          Point3 qsandwichpt3(Quaternion q, Point3 p)
          Point3 qrotate(Point3 p, Point3 axis, double θ)

          /* RFrame */
          void rframematrix(Matrix, RFrame)
          void rframematrix3(Matrix3, RFrame3)
          Point2 rframexform(Point2 p, RFrame rf)
          Point3 rframexform3(Point3 p, RFrame3 rf)
          Point2 invrframexform(Point2 p, RFrame rf)

     Page 3                       Plan 9              (printed 1/2/25)

     GEOMETRY(2)                                           GEOMETRY(2)

          Point3 invrframexform3(Point3 p, RFrame3 rf)

          /* Triangle2 */
          Point2 centroid(Triangle2 t)
          Point3 barycoords(Triangle2 t, Point2 p)

          /* Triangle3 */
          Point3 centroid3(Triangle3 t)

          /* Fmt */
          #pragma varargck type "v" Point2
          #pragma varargck type "V" Point3
          int vfmt(Fmt*)
          int Vfmt(Fmt*)
          void GEOMfmtinstall(void)

     DESCRIPTION
          This library provides routines to operate with homogeneous
          coordinates in 2D and 3D projective spaces by means of
          points, matrices, quaternions and frames of reference.

          Besides their many mathematical properties and applications,
          the data structures and algorithms used here to represent
          these abstractions are specifically tailored to the world of
          computer graphics and simulators, and so it uses the
          conventions associated with these fields, such as the
          right-hand rule for coordinate systems and column vectors
          for matrix operations.

        UTILS
          These utility functions provide extra floating-point
          operations that are not available in the standard libc.

          Name Description

          flerp(a,b,t)
               Performs a linear interpolation by a factor of t
               between a and b, and returns the result.

          fberp(a,b,c,bc)
               Performs a barycentric interpolation of the values in
               a, b and c, based on the weights provided by bc.

          fclamp(n,min,max)
               Constrains n to a value between min and max, and
               returns the result.

        Points
          A point (x,y,w) in projective space results in the point
          (x/w,y/w) in Euclidean space. Vectors are represented by
          setting w to zero, since they don't belong to any projective
          plane themselves.

     Page 4                       Plan 9              (printed 1/2/25)

     GEOMETRY(2)                                           GEOMETRY(2)

          Name Description

          Pt2(x,y,w)
               Constructor function for a Point2 point.

          Vec2(x,y)
               Constructor function for a Point2 vector.

          addpt2(a,b)
               Creates a new 2D point out of the sum of a's and b's
               components.

          subpt2(a,b)
               Creates a new 2D point out of the substraction of a's
               by b's components.

          mulpt2(p,s)
               Creates a new 2D point from multiplying p's components
               by the scalar s.

          divpt2(p,s)
               Creates a new 2D point from dividing p's components by
               the scalar s.

          lerp2(a,b,t)
               Performs a linear interpolation between the 2D points a
               and b by a factor of t, and returns the result.

          berp2(a,b,c,bc)
               Performs a barycentric interpolation between the 2D
               points a, b and c, using the weights in bc.

          dotvec2(a,b)
               Computes the dot product of vectors a and b.

          vec2len(v)
               Computes the length—magnitude—of vector v.

          normvec2(v)
               Normalizes the vector v and returns a new 2D point.

          edgeptcmp(e0,e1,p)
               Performs a comparison between an edge, defined by a
               directed line from e0 to e1, and the point p. If the
               point is to the right of the line, the result is >0; if
               it's to the left, the result is <0; otherwise—when the
               point is on the line—, it returns 0.

          ptinpoly(p,pts,npts)
               Returns 1 if the 2D point p lies within the npts-vertex
               polygon defined by pts, 0 otherwise.

     Page 5                       Plan 9              (printed 1/2/25)

     GEOMETRY(2)                                           GEOMETRY(2)

          Pt3(x,y,z,w)
               Constructor function for a Point3 point.

          Vec3(x,y,z)
               Constructor function for a Point3 vector.

          addpt3(a,b)
               Creates a new 3D point out of the sum of a's and b's
               components.

          subpt3(a,b)
               Creates a new 3D point out of the substraction of a's
               by b's components.

          mulpt3(p,s)
               Creates a new 3D point from multiplying p's components
               by the scalar s.

          divpt3(p,s)
               Creates a new 3D point from dividing p's components by
               the scalar s.

          lerp3(a,b,t)
               Performs a linear interpolation between the 3D points a
               and b by a factor of t, and returns the result.

          berp3(a,b,c,bc)
               Performs a barycentric interpolation between the 3D
               points a, b and c, using the weights in bc.

          dotvec3(a,b)
               Computes the dot product of vectors a and b.

          crossvec3(a,b)
               Computes the cross product of vectors a and b.

          vec3len(v)
               Computes the length—magnitude—of vector v.

          normvec3(v)
               Normalizes the vector v and returns a new 3D point.

          lineXsphere(rp,p0,p1,c,rad,isaray)
               Finds the intersection between the line defined by p0
               and p1 and the sphere with center at c and a radius of
               rad. If isaray is not zero, the line will be inter-
               preted as a ray directed from p0 to p1. The function
               returns the number of intersections (up to two) and, if
               rp is not nil, it is filled with the resulting points.

          ptincylinder(p,p0,p1,r)
               Tests if the point p is inside a cylinder with an axis

     Page 6                       Plan 9              (printed 1/2/25)

     GEOMETRY(2)                                           GEOMETRY(2)

               defined by the line between p0 and p1, and a radius r.

          ptincone(p,p0,p1,br)
               Tests if the point p is inside a cone with its apex at
               p0 and its base centered at p1, with a radius of br.

        Matrices
          Name Description

          identity(m)
               Initializes m into an identity, 3x3 matrix.

          addm(a,b)
               Sums the matrices a and b and stores the result back in
               a.

          subm(a,b)
               Substracts the matrix a by b and stores the result back
               in a.

          mulm(a,b)
               Multiplies the matrices a and b and stores the result
               back in a.

          smulm(m,s)
               Multiplies every element of m by the scalar s, storing
               the result in m.

          transposem(m)
               Transforms the matrix m into its transpose.

          detm(m)
               Computes the determinant of m and returns the result.

          tracem(m)
               Computes the trace of m and returns the result.

          minorm(m,row,col)
               Computes the minor of m and returns the result.

          cofactorm(m,row,col)
               Computes the cofactor of m and returns the result.

          adjm(m)
               Transforms the matrix m into its adjoint.

          invm(m)
               Transforms the matrix m into its inverse.

          xform(p,m)
               Transforms the point p by the matrix m and returns the
               new 2D point.

     Page 7                       Plan 9              (printed 1/2/25)

     GEOMETRY(2)                                           GEOMETRY(2)

          identity3(m)
               Initializes m into an identity, 4x4 matrix.

          addm3(a,b)
               Sums the matrices a and b and stores the result back in
               a.

          subm3(a,b)
               Substracts the matrix a by b and stores the result back
               in a.

          mulm3(a,b)
               Multiplies the matrices a and b and stores the result
               back in a.

          smulm3(m,s)
               Multiplies every element of m by the scalar s, storing
               the result in m.

          transposem3(m)
               Transforms the matrix m into its transpose.

          detm3(m)
               Computes the determinant of m and returns the result.

          tracem3(m)
               Computes the trace of m and returns the result.

          minorm3(m,row,col)
               Computes the minor of m and returns the result.

          cofactorm3(m,row,col)
               Computes the cofactor of m and returns the result.

          adjm3(m)
               Transforms the matrix m into its adjoint.

          invm3(m)
               Transforms the matrix m into its inverse.

          xform3(p,m)
               Transforms the point p by the matrix m and returns the
               new 3D point.

        Quaternions
          Quaternions are an extension of the complex numbers con-
          ceived as a tool to analyze 3-dimensional points.  They are
          most commonly used to orient and rotate objects in 3D space.

          Name Description

          Quat(r,i,j,k)

     Page 8                       Plan 9              (printed 1/2/25)

     GEOMETRY(2)                                           GEOMETRY(2)

               Constructor function for a Quaternion.

          Quatvec(r,v)
               Constructor function for a Quaternion that takes the
               imaginary part in the form of a vector v.

          addq(a,b)
               Creates a new quaternion out of the sum of a's and b's
               components.

          subq(a,b)
               Creates a new quaternion from the substraction of a's
               by b's components.

          mulq(a,b)
               Multiplies a and b and returns a new quaternion.

          smulq(q,s)
               Multiplies each of the components of q by the scalar s,
               returning a new quaternion.

          sdivq(q,s)
               Divides each of the components of q by the scalar s,
               returning a new quaternion.

          dotq(q,r)
               Computes the dot-product of q and r, and returns the
               result.

          invq(q)
               Computes the inverse of q and returns a new quaternion
               out of it.

          qlen(q)
               Computes q's length—magnitude—and returns the result.

          normq(q)
               Normalizes q and returns a new quaternion out of it.

          slerp(q,r,t)
               Performs a spherical linear interpolation between the
               quaternions q and r by a factor of t, and returns the
               result.

          qsandwich(q,r)
               Returns the result of "sandwiching" q with r, i.e. r' =
               qrq⁻¹.

          qsandwichpt3(q,p)
               Same as qsandwich(2), but treating p as a pure quater-
               nion when computing the product, and keeping its pro-
               jective coordinate (w) intact.

     Page 9                       Plan 9              (printed 1/2/25)

     GEOMETRY(2)                                           GEOMETRY(2)

          qrotate(p,axis,θ)
               Returns the result of rotating the point p around the
               vector axis by θ radians.

        Frames of reference
          A frame of reference (or rframe) in a n-dimensional space is
          made out of n+1 points, one being the origin p, and the
          remaining being the basis vectors b1,⋯,bn that define the
          metric within that frame.

          Name Description

          rframematrix(m,rf)
               Initializes m as an rframe transformation matrix based
               on rf.

          rframematrix3(m,rf)
               Initializes m as an rframe transformation matrix based
               on rf.

          rframexform(p,rf)
               Transforms the point p, relative to some origin frame
               of reference O, into the rframe rf. It then returns the
               new 2D point.

          rframexform3(p,rf)
               Transforms the point p, relative to some origin frame
               of reference O, into the rframe rf. It then returns the
               new 3D point.

          invrframexform(p,rf)
               Transforms the point p, relative to rf, into a point
               relative to the origin rframe O.  It then returns the
               new 2D point.

          invrframexform3(p,rf)
               Transforms the point p, relative to rf, into a point
               relative to the origin rframe O.  It then returns the
               new 3D point.

        Triangles
          Name Description

          centroid(t)
               Returns the geometric center of Triangle2 t.

          barycoords(t,p)
               Returns a 3D point that represents the barycentric
               coordinates of the 2D point p relative to the triangle
               t.

          centroid3(t)

     Page 10                      Plan 9              (printed 1/2/25)

     GEOMETRY(2)                                           GEOMETRY(2)

               Returns the geometric center of Triangle3 t.

     EXAMPLES
          Rotate a point p by θ, scale it 2x, then translate it by
          vector v:

               Matrix R = {
                    cos(θ), -sin(θ), 0,
                    sin(θ),  cos(θ), 0,
                    0, 0, 1,
               }, S = {
                    2, 0, 0,
                    0, 2, 0,
                    0, 0, 1,
               }, T = {
                    1, 0, v.x,
                    0, 1, v.y,
                    0, 0, 1,
               };

               mulm(S, R);
               mulm(T, S);
               p = xform(p, T); /* p' = T·S·R·p */

          Given a space with two observers, A and B, and a point p
          relative to A, find its location relative to B:

               pb = rframexform(invrframexform(p, A), B);

          Now let's say observer C is located relative to A; find the
          point's location in C:

               pc = rframexform(p, C);

          Finally, to obtain its location relative to the space itself
          (its global position):

               pg = invrframexform(p, A);

          The following is a common example of an RFrame being used to
          define the coordinate system of a rio(3) window.  It places
          the origin at the center of the window and sets up an
          orthonormal basis with the y-axis pointing upwards, to con-
          trast with the window system where y-values grow downwards
          (see graphics(2)).

               RFrame worldrf;

               /* from screen... */
               Point2

     Page 11                      Plan 9              (printed 1/2/25)

     GEOMETRY(2)                                           GEOMETRY(2)

               toworld(Point p)
               {
                    return rframexform(Pt2(p.x,p.y,1), worldrf);
               }

               /* ...to screen */
               Point
               fromworld(Point2 p)
               {
                    p = invrframexform(p, worldrf);
                    return Pt(p.x,p.y);
               }

               void
               main(void)
                    ⋯
                    worldrf.p = Pt2(screen->r.min.x+Dx(screen->r)/2,
                              screen->r.min.y+Dy(screen->r)/2, 1);
                    worldrf.bx = Vec2(1, 0);
                    worldrf.by = Vec2(0,-1);
                    ⋯

     SOURCE
          /sys/src/libgeometry

     SEE ALSO
          sin(2), floor(2), graphics(2)
          Philip J. Schneider, David H. Eberly, “Geometric Tools for
          Computer Graphics”, Morgan Kaufmann Publishers, 2003.
          Jonathan Blow, “Understanding Slerp, Then Not Using it”, The
          Inner Product, April 2004.
          https://www.3dgep.com/understanding-quaternions/
          https://motion.cs.illinois.edu/RoboticSystems/CoordinateTransformations.html

     BUGS
          No care is taken to avoid numeric overflows.

     HISTORY
          Libgeometry first appeared in Plan 9 from Bell Labs.  It was
          revamped for 9front in January of 2023.

     Page 12                      Plan 9              (printed 1/2/25)