ipa: j (vcd pal apr).

phsource/ph_ipa

@@ -15,7 +15,7 @@
 // | sib frc |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |
 // | frc     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |
 // | lat frc |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |
-// | apr     |     |     |     |     |     |     |     | r\  |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |
+// | apr     |     |     |     |     |     |     |     | r\  |     |     |     |     |     |     |     | j   |     |     |     |     |     |     |     |     |
 // | lat apr |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |
 // | flp     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |
 // | lat flp |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |
@@ -410,3 +410,30 @@ phoneme r\\
 
   FMT(r/r)
 endphoneme
+
+phoneme j
+  vcd pal apr liquid starttype #i
+  ipa j
+  lengthmod 7
+
+  IF nextPhW(isVowel) THEN
+    NextVowelStarts
+      VowelStart(j/j@)
+      VowelStart(j/ja)
+      VowelStart(j/je)
+      VowelStart(j/ji)
+      VowelStart(j/jo)
+      VowelStart(j/ju)
+    EndSwitch
+
+    VowelEnding(j/xj, -30)
+
+    IF prevPh(isPause) THEN
+      FMT(j/_j)
+    ENDIF
+  ELSE
+    // no vowel follows
+    Vowelout len=70
+    FMT(j/j_)
+  ENDIF
+endphoneme

phsource/phonemes

@@ -600,36 +600,10 @@ phoneme w
   ENDIF
 endphoneme
 
-
-
-
 phoneme j // **y**es
-  liquid pal starttype #i
-  lengthmod 7
-
-  IF nextPhW(isVowel) THEN
-    NextVowelStarts
-      VowelStart(j/j@)
-      VowelStart(j/ja)
-      VowelStart(j/je)
-      VowelStart(j/ji)
-      VowelStart(j/jo)
-      VowelStart(j/ju)
-    EndSwitch
-
-    VowelEnding(j/xj, -30)
-
-    IF prevPh(isPause) THEN
-      FMT(j/_j)
-    ENDIF
-  ELSE
-    // no vowel follows
-    Vowelout len=70
-    FMT(j/j_)
-  ENDIF
+  import_phoneme ipa/j
 endphoneme
 
-
 phoneme ;     // linking j, used between (i) vowels and a following vowel
               // also to palatalize consonants
   liquid pzd