        (throw (Exception. (str "Unknown mode value: " mode ". Expected :close"))))
      (.endShape *applet* CLOSE)))
 
-;; $$exec
-
 (defn exit
   "Quits/stops/exits the program.  Rather than terminating
   immediately, exit will cause the sketch to exit after draw has

  value parameter."
  [val]
  (PApplet/exp (float val)))

;; $$expand

(defn fill-float
  "Sets the color used to fill shapes. For example, (fill 204 102 0),

     (let [mode (resolve-filter-mode mode)]
       (.filter *applet* (int mode) (float level)))))

(defn focused
  "Returns a boolean value representing whether the applet has focus."
  []
