(:name "cube"
       :streams ((:program simple-shader
                           :vertex-buffer ((position :float 3
                                                     #(0.5 0.5 0.5
                                                       0.5 -0.5 0.5
                                                       -0.5 -0.5 0.5
                                                       -0.5 0.5 0.5
                                                       0.5 0.5 0.5
                                                       -0.5 0.5 0.5
                                                       -0.5 0.5 -0.5
                                                       0.5 0.5 -0.5
                                                       0.5 0.5 0.5
                                                       0.5 0.5 -0.5
                                                       0.5 -0.5 -0.5
                                                       0.5 -0.5 0.5
                                                       0.5 0.5 -0.5
                                                       -0.5 0.5 -0.5
                                                       -0.5 -0.5 -0.5
                                                       0.5 -0.5 -0.5
                                                       0.5 -0.5 0.5
                                                       0.5 -0.5 -0.5
                                                       -0.5 -0.5 -0.5
                                                       -0.5 -0.5 0.5
                                                       -0.5 0.5 0.5
                                                       -0.5 -0.5 0.5
                                                       -0.5 -0.5 -0.5
                                                       -0.5 0.5 -0.5))
                                           (color :float 4
                                                  #(0.0 1.0 0.0 1.0
                                                    0.0 1.0 0.0 1.0
                                                    0.0 1.0 0.0 1.0
                                                    0.0 1.0 0.0 1.0
                                                    0.0 0.0 1.0 1.0
                                                    0.0 0.0 1.0 1.0
                                                    0.0 0.0 1.0 1.0
                                                    0.0 0.0 1.0 1.0
                                                    1.0 0.0 0.0 1.0
                                                    1.0 0.0 0.0 1.0
                                                    1.0 0.0 0.0 1.0
                                                    1.0 0.0 0.0 1.0
                                                    1.0 1.0 0.0 1.0
                                                    1.0 1.0 0.0 1.0
                                                    1.0 1.0 0.0 1.0
                                                    1.0 1.0 0.0 1.0
                                                    0.0 1.0 1.0 1.0
                                                    0.0 1.0 1.0 1.0
                                                    0.0 1.0 1.0 1.0
                                                    0.0 1.0 1.0 1.0
                                                    1.0 0.0 1.0 1.0
                                                    1.0 0.0 1.0 1.0
                                                    1.0 0.0 1.0 1.0
                                                    1.0 0.0 1.0 1.0)))
                           :index-buffer (:unsigned-short :triangles
                                           #(0 1 2
                                             2 3 0
                                             4 5 6
                                             6 7 4
                                             8 9 10
                                             10 11 8
                                             12 13 14
                                             14 15 12
                                             16 17 18
                                             18 19 16
                                             20 21 22
                                             22 23 20)))))