From f4457a4703a214323bc790c28dceed5c8546da3d Mon Sep 17 00:00:00 2001
From: Charles Comstock <dgtized@gmail.com>
Date: Thu, 8 Aug 2024 20:34:20 -0500
Subject: [PATCH] some random modular timing examples

---
 src/shimmers/scratch/timing.cljs | 6 ++++++
 1 file changed, 6 insertions(+)
 create mode 100644 src/shimmers/scratch/timing.cljs

diff --git a/src/shimmers/scratch/timing.cljs b/src/shimmers/scratch/timing.cljs
new file mode 100644
index 000000000..da10ea197
--- /dev/null
+++ b/src/shimmers/scratch/timing.cljs
@@ -0,0 +1,6 @@
+(ns shimmers.scratch.timing)
+
+(comment
+  (map (fn [x] (mod (+ (int (/ x 24)) (int (/ x 23))) 7)) (filter (fn [x] (= (mod x 8) 0)) (range 512)))
+  (map (fn [x] [x (mod (int (/ x 29)) 7)])
+       (filter (fn [x] (= (mod x 16) (mod (int (/ x 64)) 3))) (range 512))))