tidal 0.4.26 → 0.4.27
raw patch · 2 files changed
+3/−6 lines, 2 files
Files
- Sound/Tidal/Strategies.hs +2/−5
- tidal.cabal +1/−1
Sound/Tidal/Strategies.hs view
@@ -64,7 +64,8 @@ --spreadf :: [Pattern a -> Pattern b] -> Pattern a -> Pattern b spreadf ts p = spread ($) -spin step p = stack $ map (\n -> (toRational n) <~ p |+| pan (pure n)) [0,step .. 1]+spin copies p = stack $ map (\n -> (toRational n) <~ p |+| pan (pure n)) [0,step .. 1]+ where step = (1/copies) {-stripe :: Arc -> Pattern a -> Pattern a stripe (stripeS, stripeE) p = slow t $ Pattern $ \a -> concatMap f $ arcCycles a@@ -72,10 +73,6 @@ trunc' (s,e) = (min s ((sam s) + t), min e ((sam s) + t)) stretch (s,e) = (sam s + ((s - sam s) / t), sam s + ((e - sam s) / t)) -}--spin4 step p = stack $ map (\n -> ((toRational n)/4) <~ p |+| pan (pure $ n)) [0,step .. 3]--spin16 step p = stack $ map (\n -> ((toRational n)/16) <~ p |+| pan (pure $ n)) [0,step .. 15] sawwave4 = ((*4) <$> sawwave1) sinewave4 = ((*4) <$> sinewave1)
tidal.cabal view
@@ -1,5 +1,5 @@ name: tidal-version: 0.4.26+version: 0.4.27 synopsis: Pattern language for improvised music -- description: homepage: http://yaxu.org/tidal/