math: transform: Update docstrings.

* sly/math/transform (transform+, transform*): Update docstrings.

1 files changed, 4 insertions, 4 deletions

diff --git a/sly/math/transform.scm b/sly/math/transform.scm
index bad88ac..5d65e4c 100644
--- a/sly/math/transform.scm
+++ b/sly/math/transform.scm
@@ -113,8 +113,8 @@ TRANSFORM."
              (array-ref matrix 3 2))))
 
 (define (transform+ . transforms)
-  "Return the sum of all given transformation matrices.  Return
-null-transform if called without any arguments."
+  "Return the sum of TRANSFORM.  Return 'null-transform' if called
+without any arguments."
   (define (add a b)
     (let ((m1 (transform-matrix a))
           (m2 (transform-matrix b))
@@ -130,8 +130,8 @@ null-transform if called without any arguments."
   (bytevector->pointer (array-contents (transform-matrix t))))
 
 (define (transform* . transforms)
-  "Return the product of all given transformation matrices.  Return
-identity-transform if called without any arguments."
+  "Return the product of TRANSFORMS.  Return identity-transform if
+called without any arguments."
   (define (mul a b)
     (let ((result (%make-transform (make-4x4-matrix))))
       (transform*! result a b)