 (defn constrain-int
   [amt low high]
   (PApplet/constrain (int amt) (int low) (int high)))
+
+(defn constrain constrain-float)
 
 (defn copy
   ([[sx1 sy1 sx2 sy2] [dx1 dy1 dx2 dy2]]

(defn tint-int
  ([rgb] (.tint *applet* (int rgb)))
  ([rgb alpha] (.tint *applet* (int rgb) (float alpha))))

(defn translate
  ([v] (apply translate v))

(defn emissive-int
  [gray] (.emissive *applet* (int gray)))

(def emissive emissive-float)

(defn end-camera [] (.endCamera *applet*))

