   #+clj (PApplet/floor (float n))
   #+cljs (.floor (current-applet) n))
 
-#+clj
 (defn
   ^{:requires-bindings true
     :processing-name "focused"

  current-frame-rate
  "Returns the current framerate"
  []
  (.frameRate (current-applet)))

(defn
  ^{:requires-bindings true

  size is called."
  []
  #+clj (.getHeight (current-applet))
  #+cljs (.-height (current-applet)))

#+clj
(defn
