temporal-music-notation 0.4.0 → 0.4.1

raw patch · 2 files changed

+5/−5 lines, 2 filesdep ~temporal-media

Dependency ranges changed: temporal-media

Files

• src/Temporal/Music/Score.hs +3/−3
• temporal-music-notation.cabal +2/−2

@@ -171,7 +171,7 @@ -- | Analog of 'replicate' function for scores. Replicated -- scores are played sequentially. loop :: Int -> Score a -> Score a-loop = M.loop +loop = M.loopBy  -- | After this transformation events last longer -- by some constant amount of time.@@ -295,11 +295,11 @@ withAccent f = tmapRel $ \(Event s d c) -> accent' c (f s)     where accent' v a = mapVolume (\v -> v{ volumeAccent = a }) v  --- | 'withAccentSeg' lifts function 'linfun' to dynamics level+-- | 'envelopeSeg' lifts function 'linfun' to dynamics level withAccentSeg :: (VolumeLike a) => [Double] -> Score a -> Score a withAccentSeg xs = withAccent $ (linfun xs) --- | 'withAccentRel' lifts function 'linfunRel' to dynamics level+-- | 'envelopeRel' lifts function 'linfunRel' to dynamics level withAccentRel :: (VolumeLike a) => [Accent] -> Score a -> Score a withAccentRel xs a = withAccent (linfunRel 1 xs) a 

@@ -1,5 +1,5 @@ Name:          temporal-music-notation-Version:       0.4.0+Version:       0.4.1 Cabal-Version: >= 1.6 License-file:  LICENSE License:       BSD3@@ -23,7 +23,7 @@   Build-Depends:         base >= 4, base < 5,         vector >= 0.7, data-default,-        temporal-media >= 0.4.0+        temporal-media >= 0.6.0   Hs-Source-Dirs:      src/   Exposed-Modules:         Temporal.Music