ipa: ŋ (vcd vel nas).

phsource/ph_ipa

@@ -123,3 +123,38 @@ phoneme J
     FMT(n^/n^_)
   ENDIF
 endphoneme
+
+phoneme N
+  vcd vel nas
+  Vowelout f1=3 f2=2300 300 400  f3=-200 80  len=40 rms=20 brk
+  lengthmod 8 // longer than 'n'
+
+  IF KlattSynth THEN
+    Vowelin f1=0 f2=2100 50 300 f3=0 80
+    IF nextPh(isPause2) THEN
+      FMT(klatt/nn_)
+    ENDIF
+    FMT(klatt/nn)
+  ENDIF
+
+  NextVowelStarts
+    VowelStart(nn/nn@)
+    VowelStart(nn/nna)
+    VowelStart(nn/nne)
+    VowelStart(nn/nni)
+    VowelStart(nn/nno)
+    VowelStart(nn/nnu)
+  EndSwitch
+
+  IF prevPh(#i) THEN
+    VowelEnding(nn/inn, -40)
+  ENDIF
+
+  IF prevPh(isNotVowel) AND nextPhW(isLiquid) THEN
+    FMT(nn/nnj)
+  ELIF prevPh(isPause) THEN
+    FMT(nn/_nn)
+  ELIF nextPh(isNotVowel) THEN
+    FMT(nn/nn_)
+  ENDIF
+endphoneme

phsource/phonemes

@@ -726,40 +726,8 @@ phoneme n^ // Spanish **ñ**
   import_phoneme ipa/J
 endphoneme
 
-
 phoneme N // si**ng** 
-  vcd vel nas
-  Vowelout f1=3 f2=2300 300 400  f3=-200 80  len=40 rms=20 brk
-  lengthmod 8            // longer than 'n'
-
-  IF KlattSynth THEN
-    Vowelin f1=0 f2=2100 50 300 f3=0 80
-    IF nextPh(isPause2) THEN
-      FMT(klatt/nn_)
-    ENDIF
-    FMT(klatt/nn)
-  ENDIF
-
-  NextVowelStarts
-    VowelStart(nn/nn@)
-    VowelStart(nn/nna)
-    VowelStart(nn/nne)
-    VowelStart(nn/nni)
-    VowelStart(nn/nno)
-    VowelStart(nn/nnu)
-  EndSwitch
-
-  IF prevPh(#i) THEN
-    VowelEnding(nn/inn, -40)
-  ENDIF
-
-  IF prevPh(isNotVowel) AND nextPhW(isLiquid) THEN
-    FMT(nn/nnj)
-  ELIF prevPh(isPause) THEN
-    FMT(nn/_nn)
-  ELIF nextPh(isNotVowel) THEN
-    FMT(nn/nn_)
-  ENDIF
+  import_phoneme ipa/N
 endphoneme