Mercurial > cortex
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)) |