diff options
author | David Thompson <dthompson2@worcester.edu> | 2014-05-25 12:20:13 -0400 |
---|---|---|
committer | David Thompson <dthompson2@worcester.edu> | 2014-05-25 12:20:13 -0400 |
commit | 31b116d92c0f78ad40e844aa2827010afc5a4767 (patch) | |
tree | 8287f05e1229bb3e35bc9152ffe882720079d115 /2d | |
parent | 2b656ad8fcafc1ebaaa7fe154f015e85b9dbd941 (diff) |
Fix embarrassing issue with transform-translate.
* 2d/transform.scm (transform-translate): Correct matrix.
Diffstat (limited to '2d')
-rw-r--r-- | 2d/transform.scm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/2d/transform.scm b/2d/transform.scm index ea3061d..e1dba7b 100644 --- a/2d/transform.scm +++ b/2d/transform.scm @@ -151,10 +151,10 @@ identity-transform if called without any arguments." (define (transform-translate v) "Return a new transform that translates the x and y axes by the vector2 V." - (make-transform 1 0 0 (vx v) - 0 1 0 (vy v) - 0 0 1 0 - 0 0 0 1)) + (make-transform 1 0 0 0 + 0 1 0 0 + 0 0 1 0 + (vx v) (vy v) 0 1)) (define (transform-scale v) "Return a new transform that scales the X and Y axes by the vector2 |