]> Git — Sourcephile - tmp/julm/arpeggigon.git/blob - Reactogon/Global/Clock.hs
sourcephile / git / tmp / julm / arpeggigon.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
history | raw | HEAD
First work on implementing single layer.
[tmp/julm/arpeggigon.git] / Reactogon / Global / Clock.hs
1 module Reactogon.Global.Clock where
2
3 import Reactogon.Semantics
4 import FRP.Yampa
5
6 tempo :: SF () Tempo
7 tempo = constant 96
8
9 metronome :: SF Tempo (Event Beat)
10 metronome = undefined