math: vector: Rename dot product procedures.

2 files changed, 6 insertions, 6 deletions

diff --git a/chickadee/math/vector.scm b/chickadee/math/vector.scm
index 7e847e3..680fb0f 100644
--- a/chickadee/math/vector.scm
+++ b/chickadee/math/vector.scm
@@ -33,7 +33,7 @@
             vec2-x
             vec2-y
             vec2-magnitude
-            vec2-dot-product
+            vec2-dot
             vec2-cross
             vec2-normalize
             set-vec2-x!
@@ -55,7 +55,7 @@
             vec3-y
             vec3-z
             vec3-magnitude
-            vec3-dot-product
+            vec3-dot
             vec3-cross
             vec3-cross!
             vec3-normalize
@@ -235,12 +235,12 @@ polar coordinate (R, THETA) with an arbitrary ORIGIN point."
            (* (vec3-y v) (vec3-y v))
            (* (vec3-z v) (vec3-z v)))))
 
-(define-inlinable (vec2-dot-product v1 v2)
+(define-inlinable (vec2-dot v1 v2)
   "Return the dot product of the vec2s V1 and V2."
   (+ (* (vec2-x v1) (vec2-x v2))
      (* (vec2-y v1) (vec2-y v2))))
 
-(define-inlinable (vec3-dot-product v1 v2)
+(define-inlinable (vec3-dot v1 v2)
   "Return the dot product of the vec3s V1 and V2."
   (+ (* (vec3-x v1) (vec3-x v2))
      (* (vec3-y v1) (vec3-y v2))
diff --git a/doc/api.texi b/doc/api.texi
index 0a15586..56df86f 100644
--- a/doc/api.texi
+++ b/doc/api.texi
@@ -675,7 +675,7 @@ Return a fresh copy of the 2D vector @var{v}.
 Return the magnitude of the 2D vector @var{v}.
 @end deffn
 
-@deffn {Procedure} vec2-dot-product v1 v2
+@deffn {Procedure} vec2-dot v1 v2
 Return the dot product of the 2D vectors @var{v1} and @var{v2}.
 @end deffn
 
@@ -760,7 +760,7 @@ Return a fresh copy of the 3D vector @var{v}.
 Return the magnitude of the 3D vector @var{v}.
 @end deffn
 
-@deffn {Procedure} vec3-dot-product v1 v2
+@deffn {Procedure} vec3-dot v1 v2
 Return the dot product of the 3D vectors @var{v1} and @var{v2}.
 @end deffn