     (q/box 50)
     (q/scale 2 1 0.75)))
 
-#+clj
 (defsnippet shear-x-y {}
   (q/with-translation [125 125]
     (q/rect 0 0 100 50))

            [quil.core :as q :include-macros true])
  #+cljs
  (:use-macros [quil.snippet :only [defsnippet]]))


#+cljs
(defsnippet hello {:renderer :p3d}
  (q/background 0 90 102)
  (q/translate 58 48 0)
  (q/rotate-y (/ q/PI 3.0))
  (q/box 40)
  )

#+clj
(defsnippet apply-matrix {:renderer :p3d}

  (q/box 50)
  (q/pop-matrix))

(defsnippet scale {:renderer :p3d}
  (q/camera 200 200 200 0 0 0 0 0 -1)
  (q/no-fill)
