corrected BeschSpa.encontrar_38

1 files changed, 64 insertions, 61 deletions

diff --git a/next-lib/src/spanish/BeschSpa.gf b/next-lib/src/spanish/BeschSpa.gf
index 57f215c30..0242aa3c1 100644
--- a/next-lib/src/spanish/BeschSpa.gf
+++ b/next-lib/src/spanish/BeschSpa.gf
@@ -2593,69 +2593,72 @@ oper empezar_37 : Str -> Verbum = \empezar ->
     }
   } ;
 oper encontrar_38 : Str -> Verbum = \encontrar ->
-  let enc_ = Predef.tk 6 encontrar in
+  let 
+    enc_ = Predef.tk 6 encontrar ;
+    ntr_ = Predef.dp 3 (Predef.tk 2 encontrar)
+  in
  {s = table {
-    VI Infn => enc_ + "ontrar" ;
-    VI Ger => enc_ + "ontrando" ;
-    VI Part => enc_ + "ontrado" ;
-    VPB (Pres Ind Sg P1) => enc_ + "uentro" ;
-    VPB (Pres Ind Sg P2) => enc_ + "uentras" ;
-    VPB (Pres Ind Sg P3) => enc_ + "uentra" ;
-    VPB (Pres Ind Pl P1) => enc_ + "ontramos" ;
-    VPB (Pres Ind Pl P2) => enc_ + "ontráis" ;
-    VPB (Pres Ind Pl P3) => enc_ + "uentran" ;
-    VPB (Pres Subj Sg P1) => enc_ + "uentre" ;
-    VPB (Pres Subj Sg P2) => enc_ + "uentres" ;
-    VPB (Pres Subj Sg P3) => enc_ + "uentre" ;
-    VPB (Pres Subj Pl P1) => enc_ + "ontremos" ;
-    VPB (Pres Subj Pl P2) => enc_ + "ontréis" ;
-    VPB (Pres Subj Pl P3) => enc_ + "uentren" ;
-    VPB (Impf Ind Sg P1) => enc_ + "ontraba" ; --# notpresent
-    VPB (Impf Ind Sg P2) => enc_ + "ontrabas" ; --# notpresent
-    VPB (Impf Ind Sg P3) => enc_ + "ontraba" ; --# notpresent
-    VPB (Impf Ind Pl P1) => enc_ + "ontrábamos" ; --# notpresent
-    VPB (Impf Ind Pl P2) => enc_ + "ontrabais" ; --# notpresent
-    VPB (Impf Ind Pl P3) => enc_ + "ontraban" ; --# notpresent
-    VPB (Impf Subj Sg P1) => variants {enc_ + "ontrara" ; enc_ + "ontrase"} ; --# notpresent
-    VPB (Impf Subj Sg P2) => variants {enc_ + "ontraras" ; enc_ + "ontrases"} ; --# notpresent
-    VPB (Impf Subj Sg P3) => variants {enc_ + "ontrara" ; enc_ + "ontrase"} ; --# notpresent
-    VPB (Impf Subj Pl P1) => variants {enc_ + "ontráramos" ; enc_ + "ontrásemos"} ; --# notpresent
-    VPB (Impf Subj Pl P2) => variants {enc_ + "ontrarais" ; enc_ + "ontraseis"} ; --# notpresent
-    VPB (Impf Subj Pl P3) => variants {enc_ + "ontraran" ; enc_ + "ontrasen"} ; --# notpresent
-    VPB (Pret Sg P1) => enc_ + "ontré" ; --# notpresent
-    VPB (Pret Sg P2) => enc_ + "ontraste" ; --# notpresent
-    VPB (Pret Sg P3) => enc_ + "ontró" ; --# notpresent
-    VPB (Pret Pl P1) => enc_ + "ontramos" ; --# notpresent
-    VPB (Pret Pl P2) => enc_ + "ontrasteis" ; --# notpresent
-    VPB (Pret Pl P3) => enc_ + "ontraron" ; --# notpresent
-    VPB (Fut Ind Sg P1) => enc_ + "ontraré" ; --# notpresent
-    VPB (Fut Ind Sg P2) => enc_ + "ontrarás" ; --# notpresent
-    VPB (Fut Ind Sg P3) => enc_ + "ontrará" ; --# notpresent
-    VPB (Fut Ind Pl P1) => enc_ + "ontraremos" ; --# notpresent
-    VPB (Fut Ind Pl P2) => enc_ + "ontraréis" ; --# notpresent
-    VPB (Fut Ind Pl P3) => enc_ + "ontrarán" ; --# notpresent
-    VPB (Fut Subj Sg P1) => enc_ + "ontrare" ; --# notpresent
-    VPB (Fut Subj Sg P2) => enc_ + "ontrares" ; --# notpresent
-    VPB (Fut Subj Sg P3) => enc_ + "ontrare" ; --# notpresent
-    VPB (Fut Subj Pl P1) => enc_ + "ontráremos" ; --# notpresent
-    VPB (Fut Subj Pl P2) => enc_ + "ontrareis" ; --# notpresent
-    VPB (Fut Subj Pl P3) => enc_ + "ontraren" ; --# notpresent
-    VPB (Cond Sg P1) => enc_ + "ontraría" ; --# notpresent
-    VPB (Cond Sg P2) => enc_ + "ontrarías" ; --# notpresent
-    VPB (Cond Sg P3) => enc_ + "ontraría" ; --# notpresent
-    VPB (Cond Pl P1) => enc_ + "ontraríamos" ; --# notpresent
-    VPB (Cond Pl P2) => enc_ + "ontraríais" ; --# notpresent
-    VPB (Cond Pl P3) => enc_ + "ontrarían" ; --# notpresent
+    VI Infn => enc_ + "o" + ntr_ + "ar" ;
+    VI Ger => enc_ + "o" + ntr_ + "ando" ;
+    VI Part => enc_ + "o" + ntr_ + "ado" ;
+    VPB (Pres Ind Sg P1) => enc_ + "ue" + ntr_ + "o" ;
+    VPB (Pres Ind Sg P2) => enc_ + "ue" + ntr_ + "as" ;
+    VPB (Pres Ind Sg P3) => enc_ + "ue" + ntr_ + "a" ;
+    VPB (Pres Ind Pl P1) => enc_ + "o" + ntr_ + "amos" ;
+    VPB (Pres Ind Pl P2) => enc_ + "o" + ntr_ + "áis" ;
+    VPB (Pres Ind Pl P3) => enc_ + "ue" + ntr_ + "an" ;
+    VPB (Pres Subj Sg P1) => enc_ + "ue" + ntr_ + "e" ;
+    VPB (Pres Subj Sg P2) => enc_ + "ue" + ntr_ + "es" ;
+    VPB (Pres Subj Sg P3) => enc_ + "ue" + ntr_ + "e" ;
+    VPB (Pres Subj Pl P1) => enc_ + "o" + ntr_ + "emos" ;
+    VPB (Pres Subj Pl P2) => enc_ + "o" + ntr_ + "éis" ;
+    VPB (Pres Subj Pl P3) => enc_ + "ue" + ntr_ + "en" ;
+    VPB (Impf Ind Sg P1) => enc_ + "o" + ntr_ + "aba" ; --# notpresent
+    VPB (Impf Ind Sg P2) => enc_ + "o" + ntr_ + "abas" ; --# notpresent
+    VPB (Impf Ind Sg P3) => enc_ + "o" + ntr_ + "aba" ; --# notpresent
+    VPB (Impf Ind Pl P1) => enc_ + "o" + ntr_ + "ábamos" ; --# notpresent
+    VPB (Impf Ind Pl P2) => enc_ + "o" + ntr_ + "abais" ; --# notpresent
+    VPB (Impf Ind Pl P3) => enc_ + "o" + ntr_ + "aban" ; --# notpresent
+    VPB (Impf Subj Sg P1) => variants {enc_ + "o" + ntr_ + "ara" ; enc_ + "o" + ntr_ + "ase"} ; --# notpresent
+    VPB (Impf Subj Sg P2) => variants {enc_ + "o" + ntr_ + "aras" ; enc_ + "o" + ntr_ + "ases"} ; --# notpresent
+    VPB (Impf Subj Sg P3) => variants {enc_ + "o" + ntr_ + "ara" ; enc_ + "o" + ntr_ + "ase"} ; --# notpresent
+    VPB (Impf Subj Pl P1) => variants {enc_ + "o" + ntr_ + "áramos" ; enc_ + "o" + ntr_ + "ásemos"} ; --# notpresent
+    VPB (Impf Subj Pl P2) => variants {enc_ + "o" + ntr_ + "arais" ; enc_ + "o" + ntr_ + "aseis"} ; --# notpresent
+    VPB (Impf Subj Pl P3) => variants {enc_ + "o" + ntr_ + "aran" ; enc_ + "o" + ntr_ + "asen"} ; --# notpresent
+    VPB (Pret Sg P1) => enc_ + "o" + ntr_ + "é" ; --# notpresent
+    VPB (Pret Sg P2) => enc_ + "o" + ntr_ + "aste" ; --# notpresent
+    VPB (Pret Sg P3) => enc_ + "o" + ntr_ + "ó" ; --# notpresent
+    VPB (Pret Pl P1) => enc_ + "o" + ntr_ + "amos" ; --# notpresent
+    VPB (Pret Pl P2) => enc_ + "o" + ntr_ + "asteis" ; --# notpresent
+    VPB (Pret Pl P3) => enc_ + "o" + ntr_ + "aron" ; --# notpresent
+    VPB (Fut Ind Sg P1) => enc_ + "o" + ntr_ + "aré" ; --# notpresent
+    VPB (Fut Ind Sg P2) => enc_ + "o" + ntr_ + "arás" ; --# notpresent
+    VPB (Fut Ind Sg P3) => enc_ + "o" + ntr_ + "ará" ; --# notpresent
+    VPB (Fut Ind Pl P1) => enc_ + "o" + ntr_ + "aremos" ; --# notpresent
+    VPB (Fut Ind Pl P2) => enc_ + "o" + ntr_ + "aréis" ; --# notpresent
+    VPB (Fut Ind Pl P3) => enc_ + "o" + ntr_ + "arán" ; --# notpresent
+    VPB (Fut Subj Sg P1) => enc_ + "o" + ntr_ + "are" ; --# notpresent
+    VPB (Fut Subj Sg P2) => enc_ + "o" + ntr_ + "ares" ; --# notpresent
+    VPB (Fut Subj Sg P3) => enc_ + "o" + ntr_ + "are" ; --# notpresent
+    VPB (Fut Subj Pl P1) => enc_ + "o" + ntr_ + "áremos" ; --# notpresent
+    VPB (Fut Subj Pl P2) => enc_ + "o" + ntr_ + "areis" ; --# notpresent
+    VPB (Fut Subj Pl P3) => enc_ + "o" + ntr_ + "aren" ; --# notpresent
+    VPB (Cond Sg P1) => enc_ + "o" + ntr_ + "aría" ; --# notpresent
+    VPB (Cond Sg P2) => enc_ + "o" + ntr_ + "arías" ; --# notpresent
+    VPB (Cond Sg P3) => enc_ + "o" + ntr_ + "aría" ; --# notpresent
+    VPB (Cond Pl P1) => enc_ + "o" + ntr_ + "aríamos" ; --# notpresent
+    VPB (Cond Pl P2) => enc_ + "o" + ntr_ + "aríais" ; --# notpresent
+    VPB (Cond Pl P3) => enc_ + "o" + ntr_ + "arían" ; --# notpresent
     VPB (Imper Sg P1) => variants {} ;
-    VPB (Imper Sg P2) => enc_ + "uentra" ;
-    VPB (Imper Sg P3) => enc_ + "uentre" ;
-    VPB (Imper Pl P1) => enc_ + "ontremos" ;
-    VPB (Imper Pl P2) => enc_ + "ontrad" ;
-    VPB (Imper Pl P3) => enc_ + "uentren" ;
-    VPB (Pass Sg Masc) => enc_ + "ontrado" ;
-    VPB (Pass Sg Fem) => enc_ + "ontrada" ;
-    VPB (Pass Pl Masc) => enc_ + "ontrados" ;
-    VPB (Pass Pl Fem) => enc_ + "ontradas"
+    VPB (Imper Sg P2) => enc_ + "ue" + ntr_ + "a" ;
+    VPB (Imper Sg P3) => enc_ + "ue" + ntr_ + "e" ;
+    VPB (Imper Pl P1) => enc_ + "o" + ntr_ + "emos" ;
+    VPB (Imper Pl P2) => enc_ + "o" + ntr_ + "ad" ;
+    VPB (Imper Pl P3) => enc_ + "ue" + ntr_ + "en" ;
+    VPB (Pass Sg Masc) => enc_ + "o" + ntr_ + "ado" ;
+    VPB (Pass Sg Fem) => enc_ + "o" + ntr_ + "ada" ;
+    VPB (Pass Pl Masc) => enc_ + "o" + ntr_ + "ados" ;
+    VPB (Pass Pl Fem) => enc_ + "o" + ntr_ + "adas"
     }
   } ;
 oper contar_38b : Str -> Verbum = \contar ->