From a96f748470899d4b201f2b0bc723ce21bb9ca5a4 Mon Sep 17 00:00:00 2001
From: "Reece H. Dunn" <msclrhd@gmail.com>
Date: Tue, 31 Jan 2017 13:03:18 +0000
Subject: [PATCH] ipa: d (vcd alv stp)

---
 phsource/ph_ipa   | 19 ++++++++++++++++++-
 phsource/phonemes | 19 +------------------
 2 files changed, 19 insertions(+), 19 deletions(-)

diff --git a/phsource/ph_ipa b/phsource/ph_ipa
index 32d0e542..e8d594d2 100644
--- a/phsource/ph_ipa
+++ b/phsource/ph_ipa
@@ -8,7 +8,7 @@
 // |         | vls | vcd | vls | vcd | vls | vcd | vls | vcd | vls | vcd | vls | vcd | vls | vcd | vls | vcd | vls | vcd | vls | vcd | vls | vcd | vls | vcd |
 // |---------|-----|-----|-----|-----|-----|-----|-----|-----|-----|-----|-----|-----|-----|-----|-----|-----|-----|-----|-----|-----|-----|-----|-----|-----|
 // | nas     |     | m   |     |     |     |     |     | n   |     |     |     | n`  |     |     |     | J   |     | N   |     |     |     |     |     |     |
-// | stp     |     |     |     |     | t_d |     | t   |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |
+// | stp     |     |     |     |     | t_d |     | t   | d   |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |
 // | sib afr |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |
 // | afr     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |
 // | lat afr |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |
@@ -212,6 +212,23 @@ phoneme t
   WAV(ustop/t, 90)
 endphoneme
 
+phoneme d
+  vcd alv stp
+  lengthmod 5
+  Vowelin f1=1  f2=1700 -300 300  f3=-100 80
+  Vowelout f1=2 f2=1700 -300 300  f3=-100 80 brk
+
+  IF PreVoicing THEN
+    FMT(d/xd)
+  ENDIF
+
+  IF nextPh(isPause2) THEN
+    FMT(d/d_)  addWav(x/d_)
+  ENDIF
+
+  FMT(d/d) addWav(x/d)
+endphoneme
+
 // approximant
 
 phoneme r\\
diff --git a/phsource/phonemes b/phsource/phonemes
index dd1d350e..b7633681 100644
--- a/phsource/phonemes
+++ b/phsource/phonemes
@@ -791,28 +791,11 @@ phoneme b
   FMT(b/b) addWav(x/b)
 endphoneme
 
-
 phoneme d
-  vcd alv stp
+  import_phoneme ipa/d
   voicingswitch t
-  lengthmod 5
-  Vowelin f1=1  f2=1700 -300 300  f3=-100 80
-  Vowelout f1=2 f2=1700 -300 300  f3=-100 80 brk
-
-  IF PreVoicing THEN
-    FMT(d/xd)
-  ENDIF
-
-  IF nextPh(isPause2) THEN
-    FMT(d/d_)  addWav(x/d_)
-//  ELIF nextPh(r) THEN
-//    FMT(d/dr) addWav(x/d)
-  ENDIF
-
-  FMT(d/d) addWav(x/d)
 endphoneme
 
-
 phoneme d[
   vcd dnt stp
   voicingswitch t[