Fix tests and vector function predicates
This commit is contained in:
parent
2991268ecb
commit
8dbf44a9f0
2 changed files with 10 additions and 10 deletions
|
|
@ -18,7 +18,7 @@
|
|||
(vector-* v2 (make-vector2 10 10))) => #t)
|
||||
(check (vector-= (make-vector2 1 1)
|
||||
(vector-/ v2 (make-vector2 10 10))) => #t)
|
||||
(check (vector-magnitude (make-vector 100 0)) => 100)
|
||||
(check (vector-= (make-vector 1 0)
|
||||
(vector-normalize (make-vector 100 0))) => #t)
|
||||
(check (vector-magnitude (make-vector2 100 0)) => 100)
|
||||
(check (vector-= (make-vector2 1 0)
|
||||
(vector-normalize (make-vector2 100 0))) => #t)
|
||||
)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue