diff --git a/src/Temporal/Music/Western.hs b/src/Temporal/Music/Western.hs
--- a/src/Temporal/Music/Western.hs
+++ b/src/Temporal/Music/Western.hs
@@ -56,11 +56,11 @@
 
 -- | diminuendo
 dim :: VolumeLike a => Accent -> Score a -> Score a
-dim = envelope . (*) . negate
+dim = withAccent . (*) . negate
 
 -- | crescendo
 cresc :: VolumeLike a => Accent -> Score a -> Score a
-cresc = envelope . (*)
+cresc = withAccent . (*)
 
 ---------------------------------------
 -- forms
diff --git a/src/Temporal/Music/Western/P12.hs b/src/Temporal/Music/Western/P12.hs
--- a/src/Temporal/Music/Western/P12.hs
+++ b/src/Temporal/Music/Western/P12.hs
@@ -27,21 +27,19 @@
 )
 where
 
-import Data.Default
-
-import Temporal.Music(Score, temp, note, Step)
+import Temporal.Music(Score, temp, nx, Step)
 import Temporal.Music.Scales(eqt, pyth, hind, hindFs, hindGb)
 
 import Temporal.Music.Western
 
 -- | Constructs 'Score' with one note. 'Scale' is set to equal
 -- tempered scale (from 'c1').
-tone :: Default a => Step -> Score (Note a)
-tone = note 
+tone :: Step -> Score (Note a)
+tone = nx 
 
 c, d, e, f, g, a, b, 
     cs, ds, es, fs, gs, as, bs,
-    cf, df, ef, ff, gf, af, bf :: Default a => Score (Note a)
+    cf, df, ef, ff, gf, af, bf :: Score (Note a)
 
 c    = tone 0
 cs   = tone 1
diff --git a/src/Temporal/Music/Western/P13.hs b/src/Temporal/Music/Western/P13.hs
--- a/src/Temporal/Music/Western/P13.hs
+++ b/src/Temporal/Music/Western/P13.hs
@@ -12,20 +12,18 @@
 )    
 where
 
-import Data.Default
-
-import Temporal.Music(Score, temp, setScale, c1, note)
+import Temporal.Music(Score, temp, setScale, c1, nx)
 import Temporal.Music.Western
 import Temporal.Music.Scales(eqBP, justBP)
 
 c, cs, cf, d, ds, df, e, es, ef,
     f, fs, ff, g, gs, gf, h, hs, hf, 
-    j, js, jf, a, as, af, b, bs, bf :: Default a => Score (Note a)
+    j, js, jf, a, as, af, b, bs, bf :: Score (Note a)
 
 -- | Constructs 'Score' with one note. 'Scale' is set to equal
 -- tempered Bohlen-Pierce scale (from 'c1').
-tone :: Default a => Step -> Score (Note a)
-tone = setScale (eqBP c1) . note 
+tone :: Step -> Score (Note a)
+tone = setScale (eqBP c1) . nx 
 
 c  = tone 0
 cs = tone 1 
diff --git a/temporal-music-notation-western.cabal b/temporal-music-notation-western.cabal
--- a/temporal-music-notation-western.cabal
+++ b/temporal-music-notation-western.cabal
@@ -1,5 +1,5 @@
 Name:          temporal-music-notation-western
-Version:       0.2.2
+Version:       0.2.3
 Cabal-Version: >= 1.6
 License:       BSD3
 License-file:  LICENSE
@@ -22,8 +22,8 @@
 
 Library
   Build-Depends:
-        base >= 4, base < 5, data-default >= 0.3,
-        temporal-music-notation >= 0.2.2
+        base >= 4, base < 5,
+        temporal-music-notation >= 0.2.3
   Hs-Source-Dirs:      src/
   Exposed-Modules:
         Temporal.Music.Western