mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-06-26 19:46:26 -06:00
make it possible to add more cardinals
This commit is contained in:
@@ -5,8 +5,8 @@ concrete CompatibilityEng of Compatibility = CatEng ** open Prelude, ResEng in {
|
||||
-- from Noun 19/4/2008
|
||||
|
||||
lin
|
||||
NumInt n = {s = addGenitiveS n.s ; n = Pl ; hasCard = True} ;
|
||||
OrdInt n = {s = \\c => n.s ++ (regGenitiveS "th")!c } ;
|
||||
NumInt n = {s,sp = \\_ => addGenitiveS n.s ; n = Pl ; hasCard = True} ;
|
||||
OrdInt n = {s = \\c => n.s ++ (regGenitiveS "th")!c } ;
|
||||
|
||||
oper
|
||||
-- Note: this results in a space before 's, but there's
|
||||
|
||||
Reference in New Issue
Block a user