synthesizer-dimensional 0.7 → 0.7.0.1
raw patch · 5 files changed
+14/−14 lines, 5 filesdep ~synthesizer-core
Dependency ranges changed: synthesizer-core
Files
- src/Synthesizer/Dimensional/Causal/Filter.hs +1/−1
- src/Synthesizer/Dimensional/Causal/Process.hs +4/−1
- src/Synthesizer/Dimensional/Rate/Oscillator.hs +2/−6
- src/Synthesizer/Dimensional/RateAmplitude/Rain.hs +4/−3
- synthesizer-dimensional.cabal +3/−3
src/Synthesizer/Dimensional/Causal/Filter.hs view
@@ -59,7 +59,7 @@ import qualified Synthesizer.Dimensional.Amplitude as Amp import qualified Synthesizer.Dimensional.Causal.Process as CausalD import qualified Synthesizer.Causal.Process as Causal-import Control.Arrow (Arrow, (^<<), (&&&), )+import Control.Arrow ((^<<), (&&&), ) import Synthesizer.Dimensional.Process (DimensionGradient, )
src/Synthesizer/Dimensional/Causal/Process.hs view
@@ -1,6 +1,7 @@ {-# LANGUAGE MultiParamTypeClasses #-} {-# LANGUAGE FlexibleContexts #-} {-# LANGUAGE GeneralizedNewtypeDeriving #-}+{-# LANGUAGE StandaloneDeriving #-} module Synthesizer.Dimensional.Causal.Process ( module Synthesizer.Dimensional.Causal.Process, @@ -63,7 +64,9 @@ newtype Core s yv0 yv1 = Core (Causal.T yv0 yv1)- deriving (Category, Arrow, ArrowLoop, CausalArrow.C)+ deriving (Arrow, ArrowLoop, CausalArrow.C)++deriving instance Category (Core s) instance ArrowD.Applicable (Core s) (Rate.Phantom s)
src/Synthesizer/Dimensional/Rate/Oscillator.hs view
@@ -49,8 +49,6 @@ -- import qualified Synthesizer.Dimensional.Amplitude as Amp import qualified Synthesizer.Dimensional.Rate as Rate -import qualified Synthesizer.Generic.Signal as SigG- -- import qualified Synthesizer.Dimensional.Wave.Smoothed as WaveSmooth import qualified Synthesizer.Dimensional.Wave.Controlled as WaveCtrl import qualified Synthesizer.Dimensional.Wave as WaveD@@ -267,8 +265,7 @@ {-# INLINE shapeFreqModFromSampledTone #-} shapeFreqModFromSampledTone ::- (RealField.C t, SigG.Transform storage yv, Dim.C u,- Flat.C t flat) =>+ (RealField.C t, Dim.C u, Flat.C t flat) => Interpolation.T t yv -> Interpolation.T t yv -> DN.T (Dim.Recip u) t@@ -297,8 +294,7 @@ {-# INLINE shapePhaseFreqModFromSampledTone #-} shapePhaseFreqModFromSampledTone ::- (RealField.C t, SigG.Transform storage yv, Dim.C u,- Flat.C t flatS, Flat.C t flatP) =>+ (RealField.C t, Dim.C u, Flat.C t flatS, Flat.C t flatP) => Interpolation.T t yv -> Interpolation.T t yv -> DN.T (Dim.Recip u) t
src/Synthesizer/Dimensional/RateAmplitude/Rain.hs view
@@ -29,7 +29,7 @@ import qualified Synthesizer.Dimensional.Signal as SigA import qualified Synthesizer.Dimensional.RateAmplitude.File as File--- import qualified Synthesizer.Dimensional.RateAmplitude.Play as Play+import qualified Synthesizer.Dimensional.RateAmplitude.Play as Play import Synthesizer.Dimensional.Signal ((&*^), (&*>^), ) import Synthesizer.Dimensional.Process (($:), ($::), ($^), (.:), (.^), )@@ -470,10 +470,11 @@ user 12m7.389s sys 0m1.668s -}- File.renderTimeVoltageStereoDoubleToInt16+ Play.renderTimeVoltageStereoDoubleToInt16+-- File.renderTimeVoltageStereoDoubleToInt16 (DN.frequency (44100::Double)) -- "rain-long.aiff"- "rain-short.aiff"+-- "rain-short.aiff" ((CutA.dropWhile (DN.voltage 1) (zero==) .^ Cut.take ((2 * NonNeg.toNumber partTicks +
synthesizer-dimensional.cabal view
@@ -1,5 +1,5 @@ Name: synthesizer-dimensional-Version: 0.7+Version: 0.7.0.1 License: GPL License-File: LICENSE Author: Henning Thielemann <haskell@henning-thielemann.de>@@ -32,13 +32,13 @@ Location: http://code.haskell.org/synthesizer/dimensional/ Source-Repository this- Tag: 0.7+ Tag: 0.7.0.1 Type: darcs Location: http://code.haskell.org/synthesizer/dimensional/ Library Build-Depends:- synthesizer-core >=0.6 && <0.7,+ synthesizer-core >=0.6 && <0.8, transformers >=0.2 && <0.4, event-list >=0.1 && <0.2, non-negative >=0.1 && <0.2,