diff options
| author | David Thompson <dthompson2@worcester.edu> | 2021-10-02 07:55:11 -0400 |
|---|---|---|
| committer | David Thompson <dthompson2@worcester.edu> | 2021-10-02 07:55:11 -0400 |
| commit | aba19e9f43a571b022479bbb10b490c46e16c574 (patch) | |
| tree | aa2cea3e06fd9e4b822642f0979d73fb50bd030d /tests/math/vector.scm | |
| parent | df1e5f814ce99f712231806eb4a71983c2dc1612 (diff) | |
math: vector: Fix vec2-cross.
Diffstat (limited to 'tests/math/vector.scm')
| -rw-r--r-- | tests/math/vector.scm | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/tests/math/vector.scm b/tests/math/vector.scm index e87c241..c3fc900 100644 --- a/tests/math/vector.scm +++ b/tests/math/vector.scm @@ -38,8 +38,13 @@ (vec2-magnitude (vec2 0.0 0.0)) 0.0)) (test-equal "vec2-dot" (vec2-dot (vec2 1.0 2.0) (vec2 3.0 4.0)) 11.0) - (test-equal "vec2-cross" - (vec2-cross (vec2 1.0 2.0) (vec2 3.0 4.0)) -5.0) + (test-group "vec2-cross" + (test-equal "same line" + (vec2-cross (vec2 1.0 2.0) (vec2 2.0 4.0)) 0.0) + (test-equal "clockwise" + (vec2-cross (vec2 1.0 2.0) (vec2 0.0 2.0)) 2.0) + (test-equal "counter-clockwise" + (vec2-cross (vec2 1.0 2.0) (vec2 2.0 0.0)) -4.0)) (test-approximate "vec2-normalize" (vec2-magnitude (vec2-normalize (vec2 3.7 4.9))) 1.0 0.001) (test-group "vec2*" |