   ([r g b] (fill-float r g b))
   ([r g b a] (fill-float r g b a)))
 
-#+clj
 (defn
   ^{:requires-bindings true
     :processing-name "filter()"

  ([val] (PApplet/binary (int val)))
  ([val num-digits] (PApplet/binary (int val) (int num-digits))))

#+clj
(defn
  ^{:requires-bindings true
    :processing-name "blend()"

  #+clj (PApplet/map (float val) (float low1) (float high1) (float low2) (float high2))
  #+cljs (.map (current-applet) val low1 high1 low2 high2))

(defn
  ^{:requires-bindings false
    :processing-name "PImage.mask()"
