simplify the code and allow for non-standard pronouns

2026-06-25 11:06:28 -06:00 · 2021-04-27 08:42:57 +02:00
parent 6bf2555a4a
commit b3cc234c14
8 changed files with 65 additions and 90 deletions
@@ -0,0 +1,24 @@
+--# -path=.:../common:../abstract
+
+concrete ExtendPol of Extend =
+  CatPol ** ExtendFunctor - [
+    iFem_Pron, youFem_Pron, theyFem_Pron, ProDrop
+  ]
+  with
+    (Grammar = GrammarPol) **
+  open PronounMorphoPol in {
+
+lin iFem_Pron = pronJa FemSg ;
+lin youFem_Pron = pronTy FemSg ;
+lin theyFem_Pron = pronOneFem ;
+
+lin ProDrop p = {
+    nom = [] ;
+    voc = p.voc ;
+    dep = p.dep ;
+    sp = p.sp ;
+    p  = p.p ;
+    gn = p.gn ;
+ } ;
+
+}