tidal 0.4.8 → 0.4.9

raw patch · 2 files changed

+2/−2 lines, 2 files

Files

• Sound/Tidal/Stream.hs +1/−1
• tidal.cabal +1/−1

@@ -76,7 +76,7 @@   do m' <- applyShape' shape m      let cycleD = ((fromIntegral tick) / (fromIntegral ticksPerCycle)) :: Double          logicalNow = (logicalTime change cycleD)-         logicalPeriod = 1 / fromIntegral ticksPerCycle+         logicalPeriod = (logicalTime change (cycleD + (1/(fromIntegral ticksPerCycle)))) - logicalNow          logicalOnset = logicalNow + (logicalPeriod * o) + latency          sec = floor logicalOnset          usec = floor $ 1000000 * (logicalOnset - (fromIntegral sec))

@@ -1,5 +1,5 @@ name:                tidal-version:             0.4.8+version:             0.4.9 synopsis:            Pattern language for improvised music -- description:          homepage:            http://yaxu.org/tidal/