added QuestIComp to Pred

This commit is contained in:
aarne
2014-02-14 14:36:03 +00:00
parent 22f817262f
commit 35395c22b6
10 changed files with 47 additions and 12 deletions

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