# HG changeset patch
# User Robert McIntyre <rlm@mit.edu>
# Date 1362642628 0
# Node ID 871882350c833161842b5dbf3a42d2e8e77844f2
# Parent  1727b68634ea0d98cdce30da12ed77313eb29aee
cosmetic improvement.

diff -r 1727b68634ea -r 871882350c83 org/gabor.org
--- a/org/gabor.org	Thu Mar 07 07:49:55 2013 +0000
+++ b/org/gabor.org	Thu Mar 07 07:50:28 2013 +0000
@@ -200,7 +200,8 @@
 (defn floor*
   "make a sturdy, unmovable physical floor"
   []
-  (box 10 0.1 5 :name "floor" :mass 0 :color ColorRGBA/Gray :position (Vector3f. 0 0 0)))
+  (box 10 0.1 5 :name "floor" :mass 0 
+       :color ColorRGBA/Gray :position (Vector3f. 0 0 0)))
 
 (defn floor* []
   (doto (box 10 0.1 5 :name "floor" ;10 0.1 5 ; 240 0.1 240
@@ -256,9 +257,11 @@
                     (if (not value) (add-element game (brick-wall*))))
           "key-space" (fire-cannon-ball )}
          (fn [world]
-           (position-camera world
-                            (Vector3f. 1.382548, 4.0383573, 5.994235)
-                            (Quaternion. 0.0013082094, 0.98581666, -0.1676442, 0.0076932586))
+           (position-camera
+            world
+            (Vector3f. 1.382548, 4.0383573, 5.994235)
+            (Quaternion. 0.0013082094, 0.98581666,
+                         -0.1676442, 0.0076932586))
 
            ;;(speed-up world)