move UseDAP, UseDAPMasc, UseDAPFem to the RGL and implement it for several new languages

This commit is contained in:
krangelov
2021-04-27 18:00:54 +02:00
parent 156e193d47
commit 9d657a6f24
17 changed files with 182 additions and 7 deletions
+1 -1
View File
@@ -48,7 +48,7 @@ concrete CatDut of Cat =
Pron = Pronoun ;
Det = Determiner ;
Det, DAP = Determiner ;
Quant = Quantifier ;
Predet = {s : Number => Gender => Str} ;
Num = {s : Str ; n : Number ; isNum : Bool} ;
+14
View File
@@ -101,4 +101,18 @@ lin
ICompAP ap = {s = \\agr => "hoe" ++ ap.s ! agr ! APred} ;
IAdvAdv adv = {s = "hoe" ++ adv.s} ;
lin
UseDAP dap = dap ** {
s = \\_ => dap.sp ! Neutr ;
a = agrP3 dap.n ;
isPron = False
} ;
UseDAPMasc, UseDAPFem = \dap -> dap ** {
s = \\_ => dap.sp ! Utr ;
a = agrP3 dap.n ;
isPron = False
} ;
}
+2
View File
@@ -197,4 +197,6 @@ concrete NounDut of Noun = CatDut ** open ResDut, Prelude in {
g = cn.g
} ;
DetDAP det = det ;
}