diff options
-rw-r--r-- | 2d/vector.scm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/2d/vector.scm b/2d/vector.scm index bd14dd5..a87384c 100644 --- a/2d/vector.scm +++ b/2d/vector.scm @@ -82,5 +82,6 @@ (loop (1+ i) (proc prev (vector-ref vector i)))))))) (define (vector-from-polar r theta) + "Converts polar coordinates into a cartesian vector." (vector (* r (cos theta)) (* r (sin theta)))) |