comparison org/eyes.org @ 36:91090f8a4414

minor change to vision
author Robert McIntyre <rlm@mit.edu>
date Thu, 03 Nov 2011 08:42:39 -0700
parents 5eb5c6f0590b
children 99971a59b6ac
comparison
equal deleted inserted replaced
35:5eb5c6f0590b 36:91090f8a4414
123 (.setVisible true)))) 123 (.setVisible true))))
124 (fn [#^BufferedImage i] 124 (fn [#^BufferedImage i]
125 (reset! image i) 125 (reset! image i)
126 (.repaint panel)))) 126 (.repaint panel))))
127 127
128 (defn test-vision 128 (defn test-two-eyes
129 "Tests the vision system by creating two views of the same rotating 129 "Tests the vision system by creating two views of the same rotating
130 object from different angles and displaying both of those views in 130 object from different angles and displaying both of those views in
131 JFrames." [] 131 JFrames."
132 []
132 (.start 133 (.start
133 (let [candy 134 (let [candy
134 (box 1 1 1 :physical? false :color ColorRGBA/Blue)] 135 (box 1 1 1 :physical? false :color ColorRGBA/Blue)]
135 (world (doto (Node.) 136 (world (doto (Node.)
136 (.attachChild candy)) 137 (.attachChild candy))