mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-23 03:32:51 -06:00
added QuestIComp to Pred
This commit is contained in:
@@ -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
|
||||
|
||||
Reference in New Issue
Block a user