From a5f8e60c127c3bdbf42dcb73a252d00adc557ad7 Mon Sep 17 00:00:00 2001 From: Samuel Mimram Date: Mon, 17 Aug 2020 18:40:42 +0200 Subject: [PATCH] Worked on synth. --- examples/sine.ml | 5 +++++ 1 file changed, 5 insertions(+) create mode 100644 examples/sine.ml diff --git a/examples/sine.ml b/examples/sine.ml new file mode 100644 index 0000000..5894511 --- /dev/null +++ b/examples/sine.ml @@ -0,0 +1,5 @@ +open Stream + +let () = + let s = sine () 440. >>= amp 0.5 in + Output.play (s >>= stereo)