more tsin conversions

dgtized · Nov 21, 2024 · 4eed980 · 4eed980
1 parent 4f71458
commit 4eed980
Showing 1 changed file with 5 additions and 4 deletions.
diff --git a/src/shimmers/sketches/envelope_collapse.cljs b/src/shimmers/sketches/envelope_collapse.cljs
@@ -45,11 +45,12 @@
             dtx
             (* 1.5 (tsin 0.23 t (* 0.5 x (tsin 1.25 t (+ 0.001 x)))))]
         (+ (* (tsin 0.66 (+ tx dtx) 0)
-              (math/sin
-               (* eq/TAU (+ (* 0.011 x)
+              (tsin 1.0
+                    (+ (* 0.011 x)
                        (* 1.1 (tsin -0.051 t (* 0.05 (- x 1.2))))
-                       (eq/sqr (tsin 0.15 t (tsin 0.0001 t (* 0.01 x))))))))
-           (* 0.07 (math/sin (* eq/TAU (+ (* 7 x) (* 0.005 t) 2.9)))))))))
+                       (eq/sqr (tsin 0.15 t (tsin 0.0001 t (* 0.01 x)))))
+                    0.0))
+           (* 0.07 (tsin 0.005 t (+ (* 7 x) 2.9))))))))
 
 (defn draw [{:keys [t]}]
   (q/background 1.0)