From 3921d33c640de2713a0df235437ed20831f3d79d Mon Sep 17 00:00:00 2001
From: "Reece H. Dunn" <msclrhd@gmail.com>
Date: Fri, 24 Feb 2017 19:37:08 +0000
Subject: [PATCH] en-GB-x-rp: initial support for the EXPLORE lexical set using
 words from The Raven

---
 dictsource/en_rules    | 8 ++++----
 phsource/ph_english    | 6 ++++++
 phsource/ph_english_rp | 6 ++++++
 3 files changed, 16 insertions(+), 4 deletions(-)

diff --git a/dictsource/en_rules b/dictsource/en_rules
index 8df48d99..041e0aaa 100644
--- a/dictsource/en_rules
+++ b/dictsource/en_rules
@@ -2539,8 +2539,8 @@ _it_separ) ate (_  @t
    yst) em (i      Em
 
 .group en
-     _) en (@      %En
-     _) en (g@     %EN // velarized
+     _) en (@      %e#n
+     _) en (g@     %e#N // velarized
         en (_$w_alt1 En
      &) eness (_S4 n@s
     &r) en (@      En
@@ -2554,7 +2554,7 @@ _it_separ) ate (_  @t
      _) ena (m     I2na
      &) en (Ance   @n
      &) en (ch     En
-     _) encha (n   %EntSaa
+     _) encha (n   %e#ntSaa
         enclav     EnkleIv
         en (core   0n
      &) ency (_    @ns%i
@@ -3024,7 +3024,7 @@ _it_separ) ate (_  @t
    _tr) ev (@@     I#v
 
 .group ex
-     _) ex (@      %Eks
+     _) ex (@      %e#ks
         excav      Eksk@v
      _) exc (e     %Eks
         exc (i     %Eks
diff --git a/phsource/ph_english b/phsource/ph_english
index b24b8039..263da974 100644
--- a/phsource/ph_english
+++ b/phsource/ph_english
@@ -594,6 +594,12 @@ phoneme e:
 endphoneme
 
 
+phoneme e# // **E**XPLORE
+  vwl
+  ChangePhoneme(E)
+endphoneme
+
+
 phoneme a#2  // for word 'an'
   vwl
   IF next2Ph(isVowel) THEN
diff --git a/phsource/ph_english_rp b/phsource/ph_english_rp
index 97e2d259..ff13b24f 100644
--- a/phsource/ph_english_rp
+++ b/phsource/ph_english_rp
@@ -291,3 +291,9 @@ phoneme aU@
   IfNextVowelAppend(r-)
   FMT(vwl_en_rp/aU@)
 endphoneme
+
+
+phoneme e# // **E**XPLORE
+  vwl
+  ChangePhoneme(I)
+endphoneme