Mercurial > cortex
changeset 366:871882350c83
cosmetic improvement.
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Thu, 07 Mar 2013 07:50:28 +0000 |
parents | 1727b68634ea |
children | 078600644d94 |
files | org/gabor.org |
diffstat | 1 files changed, 7 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
1.1 --- a/org/gabor.org Thu Mar 07 07:49:55 2013 +0000 1.2 +++ b/org/gabor.org Thu Mar 07 07:50:28 2013 +0000 1.3 @@ -200,7 +200,8 @@ 1.4 (defn floor* 1.5 "make a sturdy, unmovable physical floor" 1.6 [] 1.7 - (box 10 0.1 5 :name "floor" :mass 0 :color ColorRGBA/Gray :position (Vector3f. 0 0 0))) 1.8 + (box 10 0.1 5 :name "floor" :mass 0 1.9 + :color ColorRGBA/Gray :position (Vector3f. 0 0 0))) 1.10 1.11 (defn floor* [] 1.12 (doto (box 10 0.1 5 :name "floor" ;10 0.1 5 ; 240 0.1 240 1.13 @@ -256,9 +257,11 @@ 1.14 (if (not value) (add-element game (brick-wall*)))) 1.15 "key-space" (fire-cannon-ball )} 1.16 (fn [world] 1.17 - (position-camera world 1.18 - (Vector3f. 1.382548, 4.0383573, 5.994235) 1.19 - (Quaternion. 0.0013082094, 0.98581666, -0.1676442, 0.0076932586)) 1.20 + (position-camera 1.21 + world 1.22 + (Vector3f. 1.382548, 4.0383573, 5.994235) 1.23 + (Quaternion. 0.0013082094, 0.98581666, 1.24 + -0.1676442, 0.0076932586)) 1.25 1.26 ;;(speed-up world) 1.27