diff --git a/src/Synthesizer/Filter/Example.hs b/src/Synthesizer/Filter/Example.hs
--- a/src/Synthesizer/Filter/Example.hs
+++ b/src/Synthesizer/Filter/Example.hs
@@ -11,6 +11,7 @@
 import Synthesizer.Filter.Composition (T(..))
 
 import qualified Synthesizer.Plain.Oscillator as Osci
+import qualified Synthesizer.Basic.Phase      as Phase
 import qualified Synthesizer.Basic.Wave       as Wave
 import qualified Synthesizer.Plain.Filter.Recursive.FirstOrder as Filt1
 import qualified Synthesizer.Plain.Filter.NonRecursive as FiltNR
@@ -19,7 +20,6 @@
 import qualified Algebra.Transcendental as Trans
 import qualified Algebra.RealField      as RealField
 import qualified Algebra.Field          as Field
-import qualified Algebra.Absolute       as Absolute
 
 import Data.Maybe (fromMaybe)
 
@@ -125,12 +125,14 @@
     but with an synthetic initial wave.
     The sharpness of the initial wave can be controlled.
     This is used to implement various velocities. -}
-guitarRawVelo :: (Absolute.C a, Trans.C a, Module.C a a) => a -> [a]
+guitarRawVelo :: (RealField.C a, Trans.C a, Module.C a a) => a -> [a]
 guitarRawVelo velo =
    let len  = 128::Int
        wave =
-          map (Wave.power01Normed velo)
-             (take len (iterate (+ 2 / fromIntegral len) (-1)))
+          map
+            (Wave.apply (Wave.powerNormed velo))
+            (take len
+               (iterate (Phase.increment (1 / fromIntegral len)) zero))
        y = TwoWay.future
               (TwoWay.delay len
                  (apply (guitarCompLong wave)
diff --git a/synthesizer-filter.cabal b/synthesizer-filter.cabal
--- a/synthesizer-filter.cabal
+++ b/synthesizer-filter.cabal
@@ -1,5 +1,5 @@
 Name:           synthesizer-filter
-Version:        0.4.0.2
+Version:        0.4.1
 License:        GPL
 License-File:   LICENSE
 Author:         Henning Thielemann <haskell@henning-thielemann.de>
@@ -17,7 +17,7 @@
 Build-Type:     Simple
 
 Source-Repository this
-  Tag:         0.4.0.2
+  Tag:         0.4.1
   Type:        darcs
   Location:    http://code.haskell.org/synthesizer/filter/
 
@@ -27,7 +27,7 @@
 
 Library
   Build-Depends:
-    synthesizer-core >=0.4 && <0.8,
+    synthesizer-core >=0.4 && <0.9,
     transformers >=0.2 && <0.6,
     numeric-prelude >=0.2 && <0.5,
     numeric-quest >= 0.1 && <0.3,