diff options
| author | David Thompson <dthompson2@worcester.edu> | 2014-03-29 16:21:03 -0400 |
|---|---|---|
| committer | David Thompson <dthompson2@worcester.edu> | 2014-03-29 16:21:03 -0400 |
| commit | d2d5a3441e19bfe516a81d04232b1477544ec071 (patch) | |
| tree | 46f802f23b8be7c842e97aaab7283ec7c6bf3310 /2d | |
| parent | bd4e7ca64ed3d203ab7c938387d7ab32df8e5f23 (diff) | |
Remove vector2-translate and vector2-scale.
* 2d/vector2.scm (vector2-translate): Delete it.
(vector2-scale): Delete it.
Diffstat (limited to '2d')
| -rw-r--r-- | 2d/vector2.scm | 12 |
1 files changed, 1 insertions, 11 deletions
diff --git a/2d/vector2.scm b/2d/vector2.scm index 3c76625..b85757a 100644 --- a/2d/vector2.scm +++ b/2d/vector2.scm @@ -38,9 +38,7 @@ vmag vnorm vdot - vcross - vector2-translate - vector2-scale)) + vcross)) (define-record-type <vector2> (vector2 x y) @@ -108,11 +106,3 @@ returns the Z coordinate of the cross product as if the vectors were in 3D space." (- (* (vx v1) (vy v2)) (* (vy v1) (vx v2)))) - -(define (vector2-translate v) - "Perform an OpenGL translate operation with the vector V." - (gl-translate (vx v) (vy v) 0)) - -(define (vector2-scale v) - "Perform an OpenGL scale operation with the vector V." - (gl-scale (vx v) (vy v) 1)) |