mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-03 16:22:52 -06:00
Jordi's addition to Combinators api: appCN and appCNc
This commit is contained in:
@@ -1,6 +1,16 @@
|
||||
--# -path=.:alltenses:prelude
|
||||
|
||||
resource CombinatorsFin = Combinators with
|
||||
resource CombinatorsFin = Combinators - [appCN, appCNc] with
|
||||
(Cat = CatFin),
|
||||
(Structural = StructuralFin),
|
||||
(Constructors = ConstructorsFin) ;
|
||||
(Noun = NounFin),
|
||||
(Constructors = ConstructorsFin) **
|
||||
{
|
||||
oper
|
||||
appCN : CN -> NP -> NP
|
||||
= \cn,x -> mkNP the_Art (PossNP cn x) ;
|
||||
appCNc : CN -> [NP] -> NP
|
||||
= \cn,xs -> let np : NP = mkNP and_Conj xs
|
||||
in mkNP the_Art (PossNP cn np) ;
|
||||
}
|
||||
|
||||
|
||||
Reference in New Issue
Block a user