   ([ures vres] (.sphereDetail *applet* (int ures) (int vres))))
 
 (defn spotlight
+  "Adds a spot light. Lights need to be included in the draw to
+  remain persistent in a looping program. Placing them in the setup
+  of a looping program will cause them to only have an effect the
+  first time through the loop. The affect of the r, g, and b
+  parameters is determined by the current color mode. The x, y, and z
+  parameters specify the position of the light and nx, ny, nz specify
+  the direction or light. The angle parameter affects angle of the
+  spotlight cone."
   ([r g b x y z nx ny nz angle concentration]
      (.spotLight *applet* r g b x y z nx ny nz angle concentration))
   ([[r g b] [x y z] [nx ny nz] angle concentration]

     (.line *applet* (float x1) (float y1) (float z1)
            (float x2) (float y2) (float z2))))

(defn load-bytes [filename] (PApplet/loadBytes filename))

(defn load-font
  "Loads a font into a variable of type PFont. To load correctly,

  ([x y] (.curveVertex *applet* (float x) (float y)))
  ([x y z] (.curveVertex *applet* (float x) (float y) (float z))))

(defn day
  "Get the current day of the month (1 through 31)."
  []
