tidal 0.4.27 → 0.4.28

raw patch · 2 files changed

+8/−3 lines, 2 files

Files

• Sound/Tidal/Strategies.hs +7/−2
• tidal.cabal +1/−1

@@ -64,8 +64,13 @@ --spreadf :: [Pattern a -> Pattern b] -> Pattern a -> Pattern b spreadf ts p = spread ($) -spin copies p = stack $ map (\n -> (toRational n) <~ p |+| pan (pure n)) [0,step .. 1]-  where step = (1/copies)+spin :: Int -> OscPattern -> OscPattern+spin copies p =+  stack $ map (\n -> let offset = toInteger n % toInteger copies in+                     offset <~ p+                     |+| pan (pure $ fromRational offset)+              )+          [0 .. (copies - 1)]  {-stripe :: Arc -> Pattern a -> Pattern a stripe (stripeS, stripeE) p = slow t $ Pattern $ \a -> concatMap f $ arcCycles a

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