ipa: ʁ (vcd uvl frc).

phsource/ph_ipa

 // | afr     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |
 // | lat afr |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |
 // | sib frc |     |     |     |     |     |     |     | z   |     | Z   |     | z`  |     | z\  |     |     |     |     |     |     |     |     |     |     |
-// | frc     |     | B   |     | v   |     | D   |     |     |     |     |     |     |     |     |     | j\  |     | G   |     |     |     |     |     |     |
+// | frc     |     | B   |     | v   |     | D   |     |     |     |     |     |     |     |     |     | j\  |     | G   |     | R   |     |     |     |     |
 // | lat frc |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |
 // | apr     |     | P   |     |     |     |     |     | r\  |     |     |     |     |     |     |     | j   |     |     |     |     |     |     |     |     |
 // | lat apr |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |     |
   FMT(voc/Q) addWav(vocw/Q)
 endphoneme
 
+phoneme R
+  vcd uvl frc
+  ipa ʁ
+  lengthmod 6
+
+  IF nextPh(isPause2) THEN
+    FMT(voc/Q_ulv) addWav(ufric/xx, 60)
+  ENDIF
+  FMT(voc/Q_ulv) addWav(ufric/xx, 80)
+endphoneme
+
 // approximant
 
 phoneme P

phsource/phonemes

 endphoneme
 
 phoneme Q"
-  vcd uvl frc
-  ipa ʁ
-  lengthmod 6
-
-  IF nextPh(isPause2) THEN
-    FMT(voc/Q_ulv) addWav(ufric/xx, 60)
-  ENDIF
-  FMT(voc/Q_ulv) addWav(ufric/xx, 80)
+  import_phoneme ipa/R
 endphoneme
 
 
-
-
 //*******************************************************************
 // UNVOICED STOPS
 //*******************************************************************