From c8813e2b4da15192310fbb89f15cc02c54f66d2b Mon Sep 17 00:00:00 2001
From: Jake Zerrer <him@jakezerrer.com>
Date: Thu, 6 Nov 2025 11:14:46 -0500
Subject: Move scratch.clj to dev

---
 src/scratch.clj | 24 ------------------------
 1 file changed, 24 deletions(-)
 delete mode 100644 src/scratch.clj

(limited to 'src/scratch.clj')

diff --git a/src/scratch.clj b/src/scratch.clj
deleted file mode 100644
index 7c305aa..0000000
--- a/src/scratch.clj
+++ /dev/null
@@ -1,24 +0,0 @@
-(ns scratch
-  (:require [unheard.midi :as midi]
-            [unheard.midi.percussion :refer [kick snare]]
-            [missionary.core :as m]))
-
-#_(print-all-midi-devices)
-
-(def midi-keyboard  "CoreMIDI4J - Minilab3 MIDI")
-
-(def run
-  (midi/<bus midi-keyboard
-             (fn [v]
-               (m/ap
-                 ;; 2 is the number of message types, e.g. :key
-                (let [[t f] (m/?> 2 (midi/keyboard v))]
-                  [t (rest (m/?< f))])))))
-
-#_
-(def cancel
-  (run prn prn))
-
-#_
-(cancel)
-
-- 
cgit v1.2.3