diff options
| -rw-r--r-- | examples/model.scm | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/examples/model.scm b/examples/model.scm index cc73918..5980e85 100644 --- a/examples/model.scm +++ b/examples/model.scm @@ -8,7 +8,6 @@ (ice-9 format)) (define projection (perspective-projection (/ pi 3) (/ 4.0 3.0) 0.1 500.0)) -(define rotation (make-identity-matrix4)) (define translation (make-identity-matrix4)) (define view-matrix (make-identity-matrix4)) (define model-matrix (make-identity-matrix4)) @@ -49,10 +48,8 @@ (vec3-z position))) ;; Compute new view matrix - (matrix4-rotate-y! rotation theta) (matrix4-translate! translation position) (matrix4-identity! view-matrix) - (matrix4-mult! view-matrix view-matrix rotation) (matrix4-mult! view-matrix view-matrix translation) ;; Rotate the model about the y-axis |