GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-23 09:52:55 -06:00
Code Issues Packages Projects Releases Wiki Activity

Added versions of mkCn that take N instead of CN arguments.

Browse Source
This commit is contained in:
bringert
2007-04-19 21:07:37 +00:00
parent 42bf389e1b
commit 90393455a7
1 changed files with 20 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

22
lib/resource-1.0/api/Constructors.gf
View File

@@ -157,11 +157,17 @@ incomplete resource Constructors = open Grammar in {
mkCN : N2 -> CN ; -- son mkCN : N2 -> CN ; -- son
mkCN : N3 -> CN ; -- flight mkCN : N3 -> CN ; -- flight
mkCN : AP -> CN -> CN ; -- big house mkCN : AP -> CN -> CN ; -- big house
mkCN : AP -> N -> CN ; -- big house
mkCN : CN -> AP -> CN ; -- big house mkCN : CN -> AP -> CN ; -- big house
mkCN : N -> AP -> CN ; -- big house
mkCN : CN -> RS -> CN ; -- house that John owns mkCN : CN -> RS -> CN ; -- house that John owns
mkCN : N -> RS -> CN ; -- house that John owns
mkCN : CN -> Adv -> CN ; -- house on the hill mkCN : CN -> Adv -> CN ; -- house on the hill
mkCN : N -> Adv -> CN ; -- house on the hill
mkCN : CN -> SC -> CN ; -- fact that John smokes, question if he does mkCN : CN -> SC -> CN ; -- fact that John smokes, question if he does
mkCN : CN -> NP -> CN -- number x, numbers x and y mkCN : N -> SC -> CN ; -- fact that John smokes, question if he does
mkCN : CN -> NP -> CN ; -- number x, numbers x and y
mkCN : N -> NP -> CN -- number x, numbers x and y
} ; } ;
--2 Adjectival phrases --2 Adjectival phrases
@@ -397,16 +403,28 @@ incomplete resource Constructors = open Grammar in {
= UseN3 ; = UseN3 ;
mkCN : AP -> CN -> CN -- big house mkCN : AP -> CN -> CN -- big house
= AdjCN ; = AdjCN ;
mkCN : AP -> N -> CN -- big house
= \x,y -> AdjCN x (UseN y) ;
mkCN : CN -> AP -> CN -- big house mkCN : CN -> AP -> CN -- big house
= \x,y -> AdjCN y x ; = \x,y -> AdjCN y x ;
mkCN : N -> AP -> CN -- big house
= \x,y -> AdjCN y (UseN x) ;
mkCN : CN -> RS -> CN -- house that John owns mkCN : CN -> RS -> CN -- house that John owns
= RelCN ; = RelCN ;
mkCN : N -> RS -> CN -- house that John owns
= \x,y -> RelCN (UseN x) y ;
mkCN : CN -> Adv -> CN -- house on the hill mkCN : CN -> Adv -> CN -- house on the hill
= AdvCN ; = AdvCN ;
mkCN : N -> Adv -> CN -- house on the hill
= \x,y -> AdvCN (UseN x) y ;
mkCN : CN -> SC -> CN -- fact that John smokes, question if he does mkCN : CN -> SC -> CN -- fact that John smokes, question if he does
= SentCN ; = SentCN ;
mkCN : N -> SC -> CN -- fact that John smokes, question if he does
= \x,y -> SentCN (UseN x) y ;
mkCN : CN -> NP -> CN -- number x, numbers x and y mkCN : CN -> NP -> CN -- number x, numbers x and y
= ApposCN = ApposCN ;
mkCN : N -> NP -> CN -- number x, numbers x and y
= \x,y -> ApposCN (UseN x) y
} ; } ;