one new verb paradigm for Polish resource and one new function in ExtraPol

2026-06-30 02:58:35 -06:00 · 2011-06-23 15:28:03 +00:00
parent a38cb7e09e
commit 4659511ccf
3 changed files with 25 additions and 3 deletions
@@ -1,6 +1,13 @@
 concrete ExtraPol of ExtraPolAbs = CatPol ** open ResPol in {

-  lin ProDrop p = {
+  lin 
+
+  QualifierCN adj cn = {
+    s = \\n,c => (cn.s ! n ! c) ++ (adj.s ! AF (cast_gennum!<cn.g,n>) c);
+    g = cn.g    
+  };
+
+  ProDrop p = {
    nom = [] ;
    voc = p.voc ;
    dep = p.dep ;