   Infinity (exclusive) and values are returned in the range -PI/2 to
   PI/2 ."
   [n]
-  (PApplet/atan (float n)))
-
-#+clj
+  #+clj (PApplet/atan (float n))
+  #+cljs (.atan (current-applet) n))
+
 (defn
   ^{:requires-bindings false
     :processing-name "atan2()"

  methods in Processing require their parameters to be specified in
  radians."
  [degrees]
  (PApplet/radians (float degrees)))

(defn
  ^{:requires-bindings true

  radians (values from 0 to PI*2). Values are returned in the range
  infinity to -infinity."
  [angle]
  #+clj (PApplet/tan (float angle))
  #+cljs (.tan (current-applet) angle))

#+clj
(defn
