diff options
author | David Thompson <dthompson2@worcester.edu> | 2018-01-17 14:43:31 -0500 |
---|---|---|
committer | David Thompson <dthompson2@worcester.edu> | 2018-01-17 14:43:31 -0500 |
commit | 44815d406e6679f5f010c7c75f43f17016d822b9 (patch) | |
tree | b36784e2055441d7ffb4b641963657230da99500 | |
parent | 5896bde48b8462e935b4c0c7c51c21eb524b1913 (diff) |
math: matrix: Fix typos in matrix4-2d-transform!
* chickadee/math/matrix.scm (matrix4-2d-transform!): Fix bad typos!
-rw-r--r-- | chickadee/math/matrix.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/chickadee/math/matrix.scm b/chickadee/math/matrix.scm index e462cd2..26c1dc2 100644 --- a/chickadee/math/matrix.scm +++ b/chickadee/math/matrix.scm @@ -398,7 +398,7 @@ happens with respect to ORIGIN, a 2D vector." (x (vec2-x position)) (y (vec2-y position)) (ox (vec2-x origin)) - (oy (vec2-x origin)) + (oy (vec2-y origin)) (sx (vec2-x scale)) (sy (vec2-y scale)) (kx (vec2-x skew)) @@ -406,7 +406,7 @@ happens with respect to ORIGIN, a 2D vector." (c (cos rotation)) (s (sin rotation)) (q (- (* c sx) (* s sy ky))) - (r (+ (* s sx) (* c sx ky))) + (r (+ (* s sx) (* c sy ky))) (s (- (* c sx kx) (* s sy))) (t (+ (* s sx kx) (* c sy)))) (bytevector-fill! bv 0) |