1 files changed, 11 insertions, 0 deletions
diff --git a/src/example_song.clj b/src/example_song.clj
new file mode 100644
index 0000000..096c686
--- /dev/null
+++ b/src/example_song.clj
@@ -0,0 +1,11 @@
+(ns example-song
+  (:require [missionary.core :as m]
+            [notation :refer [note poly group]]))
+
+(defn melody [clock]
+  (m/signal
+   (group clock 0 2
+          (poly (note clock 0 4 1)
+                (note clock 0 5 3)
+                (note clock 0 3 5)
+                (note clock 2 1 7)))))