   [n]
   (PApplet/ceil (float n)))
 
-(defn color-float
+(defn color
   "Creates an integer representation of a color The parameters are
   interpreted as RGB or HSB values depending on the current
   color-mode. The default mode is RGB values from 0 to 255 and


  It is not possible to use transparency (alpha) in background colors
  with the main drawing surface, however they will work properly with
  create-graphics."
  ([rgb] (.background *applet* (int rgb)))
  ([rgb alpha] (.background *applet* (int rgb) (float alpha))))

(def ^{:arglists (:arglists (meta #'background-float))
       :doc (:doc (meta #'background-float))}
  background background-float)

(defn background-image
  "Specify an image to be used as the background for a sketch. Its

  drawn to the screen. Used in combination with ambient, specular, and
  shininess in setting the material properties of shapes. Converts all
  args to ints"
  [int-val] (.emissive *applet* (int int-val)))

(defn emissive
  "Sets the emissive color of the material used for drawing shapes
