mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-06-22 01:36:20 -06:00
(Som) Better handling of AP and NP complements, remove redundant fields
This commit is contained in:
@@ -88,15 +88,15 @@ concrete QuestionSom of Question = CatSom ** open
|
||||
|
||||
-- : IAdv -> IComp ;
|
||||
CompIAdv iadv = { -- where (is it)
|
||||
comp = \\_ => <[], []> ;
|
||||
npcomp = iadv.s ;
|
||||
aComp = \\_ => [] ;
|
||||
nComp = iadv.s ;
|
||||
stm = Waa NoCopula ;
|
||||
} ;
|
||||
|
||||
-- : IP -> IComp ;
|
||||
CompIP ip = { -- who (is it)
|
||||
comp = \\_ => <[], []> ;
|
||||
npcomp = ip.s ! Abs ;
|
||||
aComp = \\_ => [] ;
|
||||
nComp = ip.s ! Abs ;
|
||||
stm = Waa NoCopula ;
|
||||
} ;
|
||||
|
||||
|
||||
Reference in New Issue
Block a user