support plural PNs

This commit is contained in:
Krasimir Angelov
2022-10-21 21:48:51 +02:00
parent a718a92485
commit 7d9d2a2b5c
4 changed files with 11 additions and 9 deletions
+1 -1
View File
@@ -28,7 +28,7 @@ concrete NounGer of Noun = CatGer ** open ResGer, MorphoGer, Prelude in {
UsePN pn = {
s = \\c => usePrepC c (\k -> pn.s ! k) ;
a = agrgP3 pn.g Sg ;
a = agrgP3 pn.g pn.n ;
-- isLight = True ; -- means: this is not a heavy NP, but comes before negation
-- isPron = False ; -- HL 6/2019: to regulate Pron/NonPronNP order
w = WLight ;