msyds/gf-rgl
1
0
Fork 0
forked from GitHub/gf-rgl
Code Pull Requests Activity

added QuestIComp to Pred

Browse Source
This commit is contained in:
aarne
2014-02-14 14:36:03 +00:00
parent 189b7cf8ee
commit 2e583968cb
10 changed files with 47 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
src/experimental/PredInstanceEng.gf
View File

@@ -47,6 +47,7 @@ oper
NAgr = Number ;
IPAgr = Number ;
RPAgr = ResEng.RAgr ;
ICAgr = Unit ;
defaultAgr : Agr = AgP3Sg Neutr ;
@@ -66,6 +67,8 @@ oper
AgP3Pl => Pl
} ;
agr2icagr : Agr -> ICAgr = \a -> UUnit ;
-- restoring full Agr
ipagr2agr : IPAgr -> Agr = \n -> case n of {
Sg => AgP3Sg Neutr ; ---- gender