 (defn screen-z
   [x y z] (.screenX *applet* (float x) (float y) (float z)))
 
-(defn second [] (PApplet/second))
+(defn seconds [] (PApplet/second))
 
 ;; $$selectFolder
 ;; $$selectInput
 ;; $$selectOutput
 
 (defn set-pixel
-  ([x y c] (.set *applet* (int x) (int y) (int c)))
-  ([dx dy #^PImage src] (.set *applet* (int dx) (int dy) src)))
+  [x y c] (.set *applet* (int x) (int y) (int c)))
+
+(defn set-image-at
+  [dx dy #^PImage src] (.set *applet* (int dx) (int dy) src))
 
 ;; $$setup
+
 ;; $$setupExternalMessages
 ;; $$setupFrameListener
 


(defn load-matrix [] (.loadMatrix *applet*))

;; (defn load-pixels [] (.loadPixels *applet*))

;; $$loadStrings
;; $$log

(defn loop [] (.loop *applet*))

;; $$mag
;; $$main

			  (float x1) (float y1) (float z1) 
			  (float x2) (float y2) (float z2)
			  (float x3) (float y3) (float z3)
			  (float x4) (float y4) (float z4))))

(defn curve-detail [detail] (.curveDetail *applet* (int detail)))

