diff options
Diffstat (limited to '2d')
| -rw-r--r-- | 2d/vector.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/2d/vector.scm b/2d/vector.scm index 1d4c33e..7dcbcb2 100644 --- a/2d/vector.scm +++ b/2d/vector.scm @@ -63,7 +63,7 @@ (define (normalize vector) "Normalizes a vector." - (let ((m (magnitude vector))) + (let ((m (mag vector))) (vector-map (lambda (e) (/ e m)) vector))) (define (vector-reduce proc default vector) |