more simplification using tsin

dgtized · Nov 21, 2024 · d9cf0bd · d9cf0bd
1 parent c2f6032
commit d9cf0bd
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/shimmers/sketches/envelope_collapse.cljs b/src/shimmers/sketches/envelope_collapse.cljs
@@ -42,8 +42,8 @@
       (let [tx (+ (tsin 0.05 t -0.1)
                   (eq/unit-sin (* 2 eq/TAU (+ x (* 0.9 t))))
                   x)
-            dtx (* 1.5 (math/sin (* eq/TAU (+ (* 0.23 t)
-                                         (* 1.75 x (math/sin (+ (* 0.1 x) (* 2 t))))))))]
+            dtx
+            (* 1.5 (tsin 0.23 t (* 0.5 x (tsin 1.25 t (+ 0.001 x)))))]
         (+ (* (math/sin (* 1.5 eq/TAU (+ tx dtx)))
               (math/sin
                (* eq/TAU (+ (* 0.011 x)