diff options
author | David Thompson <dthompson2@worcester.edu> | 2021-05-12 20:48:10 -0400 |
---|---|---|
committer | David Thompson <dthompson2@worcester.edu> | 2021-05-12 20:48:10 -0400 |
commit | 3152304d7c04c19e8780dccab3ac4793fde06ad2 (patch) | |
tree | 5783629f1f5e2a3dbacb686825054848696c8c5b | |
parent | 662d04ffa53f9c400d959ceeb9af9a7bb9ad63cf (diff) |
math: vector: Fix vec3-copy!
-rw-r--r-- | chickadee/math/vector.scm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/chickadee/math/vector.scm b/chickadee/math/vector.scm index 3476326..3cc1a9a 100644 --- a/chickadee/math/vector.scm +++ b/chickadee/math/vector.scm @@ -210,8 +210,10 @@ polar coordinate (R, THETA) with an arbitrary ORIGIN point." (define (vec3-copy! source-vec3 target-vec3) "Copy SOURCE-VEC3 to TARGET-VEC3." - (set-vec3-x! target-vec3 (vec3-x source-vec3)) - (set-vec3-y! target-vec3 (vec3-y source-vec3))) + (set-vec3! target-vec3 + (vec3-x source-vec3) + (vec3-y source-vec3) + (vec3-z source-vec3))) (define (vec2-copy vec2) "Return a new vec2 that is a copy of VEC2." |