added QuantityNP

This commit is contained in:
Krasimir Angelov
2026-04-16 08:43:22 +02:00
parent 27c2d7cbb3
commit 34f5e625e3

View File

@@ -243,4 +243,9 @@ concrete NounTur of Noun = CatTur ** open ResTur, SuffixTur, HarmonyTur, ParamX,
a = np.a
} ;
QuantityNP n m = {
s = \\c => preOrPost m.isPre m.s (n.s ! NCard ! Sg ! Nom) ;
h = mkHar I_Har SVow ; -- guessed
a = agrP3 n.n
} ;
}