GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-21 02:39:31 -06:00
Code Issues Packages Projects Releases Wiki Activity

Exx-file complete except holes for Int

Browse Source
This commit is contained in:
aarne
2007-06-04 12:44:51 +00:00
parent d014312aa9
commit 308b579cff
15 changed files with 398 additions and 139 deletions
Download Patch File Download Diff File Expand all files Collapse all files

67
lib/resource-1.0/api/examples/Exx.gf
View File

@@ -1,10 +1,11 @@
abstract Exx = Cat-[VP] ** {
abstract Exx = Cat-[VP], Conjunction-[VP] ** {
cat VP ; --- hack to circumvent missing lockfields in overload resolution
fun
ex1_Text, ex2_Text, ex3_Text, ex4_Text, ex5_Text, ex6_Text, ex7_Text, ex8_Text : Text ;
ex1_Text, ex2_Text, ex3_Text, ex4_Text, ex5_Text, ex6_Text, ex7_Text,
ex8_Text : Text ;
ex1_Phr, ex2_Phr, ex3_Phr, ex4_Phr, ex5_Phr, ex6_Phr : Phr ;
@@ -12,24 +13,25 @@ fun
ex1_Voc : Voc ;
ex1_Utt, ex2_Utt, ex3_Utt, ex4_Utt, ex5_Utt, ex6_Utt, ex7_Utt, ex8_Utt, ex8_Utt, ex9_Utt, ex10_Utt, ex11_Utt : Utt ;
ex1_Utt, ex2_Utt, ex3_Utt, ex4_Utt, ex5_Utt, ex6_Utt, ex7_Utt, ex8_Utt, ex8_Utt,
ex9_Utt, ex10_Utt, ex11_Utt : Utt ;
ex1_S, ex2_S, ex3_S, ex4_S, ex5_S, ex6_S, ex7_S : S ;
ex1_Cl, ex2_Cl, ex3_Cl, ex4_Cl, ex5_Cl, ex6_Cl, ex7_Cl, ex8_Cl, ex9_Cl, ex10_Cl,
ex11_Cl, ex12_Cl, ex13_Cl, ex14_Cl, ex15_Cl, ex16_Cl, ex17_Cl, ex18_Cl, ex19_Cl, ex20_Cl,
ex21_Cl, ex22_Cl, ex23_Cl, ex24_Cl, ex25_Cl : Cl ;
ex11_Cl, ex12_Cl, ex13_Cl, ex14_Cl, ex15_Cl, ex16_Cl, ex17_Cl, ex18_Cl, ex19_Cl,
ex20_Cl, ex21_Cl, ex22_Cl, ex23_Cl, ex24_Cl, ex25_Cl : Cl ;
ex1_VP, ex2_VP, ex3_VP, ex4_VP, ex5_VP, ex6_VP, ex7_VP, ex8_VP, ex9_VP, ex10_VP,
ex11_VP, ex12_VP, ex13_VP, ex14_VP, ex15_VP, ex16_VP, ex17_VP, ex18_VP, ex19_VP, ex20_VP,
ex21_VP, ex22_VP : VP ;
ex11_VP, ex12_VP, ex13_VP, ex14_VP, ex15_VP, ex16_VP, ex17_VP, ex18_VP, ex19_VP,
ex20_VP, ex21_VP, ex22_VP : VP ;
ex1_NP, ex2_NP, ex3_NP, ex4_NP, ex5_NP, ex6_NP, ex7_NP, ex8_NP, ex9_NP, ex10_NP,
ex11_NP, ex12_NP, ex13_NP, ex14_NP, ex15_NP, ex16_NP, ex17_NP, ex18_NP, ex19_NP, ex20_NP,
ex21_NP, ex22_NP, ex23_NP : NP ;
ex11_NP, ex12_NP, ex13_NP, ex14_NP, ex15_NP, ex16_NP, ex17_NP, ex18_NP, ex19_NP,
ex20_NP, ex21_NP, ex22_NP, ex23_NP : NP ;
ex1_Det, ex2_Det, ex3_Det, ex4_Det, ex5_Det, ex6_Det, ex7_Det, ex8_Det, ex9_Det, ex10_Det,
ex11_Det, ex12_Det, ex13_Det, ex14_Det : Det ;
ex1_Det, ex2_Det, ex3_Det, ex4_Det, ex5_Det, ex6_Det, ex7_Det, ex8_Det, ex9_Det,
ex10_Det, ex11_Det, ex12_Det, ex13_Det, ex14_Det : Det ;
ex1_Quant, ex2_Quant : Quant ;
@@ -37,6 +39,49 @@ fun
ex1_QuantPl : QuantPl ;
ex1_Num, ex2_Num, ex3_Num : Num ;
ex1_Ord, ex2_Ord, ex3_Ord : Ord ;
ex1_AdN : AdN ;
ex1_Numeral, ex2_Numeral, ex3_Numeral, ex4_Numeral, ex5_Numeral,
ex6_Numeral, ex7_Numeral, ex8_Numeral, ex9_Numeral,
ex10_Numeral, ex11_Numeral, ex12_Numeral, ex13_Numeral : Numeral ;
ex1_CN, ex2_CN, ex3_CN, ex4_CN, ex5_CN, ex6_CN, ex7_CN, ex8_CN, ex9_CN, ex10_CN,
ex11_CN, ex12_CN, ex13_CN, ex14_CN, ex15_CN, ex16_CN, ex17_CN, ex18_CN : CN ;
ex1_AP, ex2_AP, ex3_AP, ex4_AP, ex5_AP, ex6_AP, ex7_AP, ex8_AP, ex9_AP, ex10_AP,
ex11_AP, ex12_AP, ex13_AP : AP ;
ex1_Adv, ex2_Adv, ex3_Adv, ex4_Adv, ex5_Adv, ex6_Adv, ex7_Adv, ex8_Adv,
ex9_Adv, ex10_Adv : Adv ;
ex1_QS, ex2_QS, ex3_QS : QS ;
ex1_QCl, ex2_QCl, ex3_QCl, ex4_QCl, ex5_QCl, ex6_QCl, ex7_QCl, ex8_QCl : QCl ;
ex1_IP, ex2_IP, ex3_IP : IP ;
ex1_IAdv : IAdv ;
ex1_RS, ex2_RS : RS ;
ex1_RCl, ex2_RCl, ex3_RCl, ex4_RCl : RCl ;
ex1_RP, ex2_RP : RP ;
ex1_Slash, ex2_Slash, ex3_Slash, ex4_Slash : Slash ;
ex1_ListS, ex2_ListS : ListS ;
ex1_ListAdv, ex2_ListAdv : ListAdv ;
ex1_ListAP, ex2_ListAP : ListAP ;
ex1_ListNP, ex2_ListNP : ListNP ;
-- auxiliary to show VP's

2
lib/resource-1.0/api/examples/ExxEng.gf
View File

@@ -1,6 +1,6 @@
--# -path=.:..:alltenses:prelude
concrete ExxEng of Exx = CatEng-[VP] ** ExxI with
concrete ExxEng of Exx = CatEng-[VP], ConjunctionEng-[VP] ** ExxI with
(Lang = LangEng),
(Constructors = ConstructorsEng) ;

2
lib/resource-1.0/api/examples/ExxFin.gf
View File

@@ -1,6 +1,6 @@
--# -path=.:..:alltenses:prelude
concrete ExxFin of Exx = CatFin-[VP] ** ExxI with
concrete ExxFin of Exx = CatFin-[VP], ConjunctionFin-[VP] ** ExxI with
(Lang = LangFin),
(Constructors = ConstructorsFin) ;

2
lib/resource-1.0/api/examples/ExxFre.gf
View File

@@ -1,6 +1,6 @@
--# -path=.:..:alltenses:prelude
concrete ExxFre of Exx = CatFre-[VP] ** ExxI with
concrete ExxFre of Exx = CatFre-[VP], ConjunctionFre-[VP] ** ExxI with
(Lang = LangFre),
(Constructors = ConstructorsFre) ;

7
lib/resource-1.0/api/examples/ExxGer.gf Normal file
View File

@@ -0,0 +1,7 @@
--# -path=.:..:alltenses:prelude
concrete ExxGer of Exx = CatGer-[VP], ConjunctionGer-[VP] ** ExxI with
(Lang = LangGer),
(Constructors = ConstructorsGer) ;

127
lib/resource-1.0/api/examples/ExxI.gf
View File

@@ -1,4 +1,5 @@
incomplete concrete ExxI of Exx = Cat-[VP] ** open Lang, Constructors in {
incomplete concrete ExxI of Exx = Cat-[VP], Conjunction-[VP] **
open Lang, Constructors in {
-- examples for Constructors.
@@ -139,18 +140,136 @@ incomplete concrete ExxI of Exx = Cat-[VP] ** open Lang, Constructors in {
ex2_Quant = indefQuant ;
ex1_QuantSg = mkQuantSg this_Quant ;
ex2_QuantSg = massQuant ;
ex1_QuantPl = mkQuantSg this_Quant ;
ex2_QuantSg = massQuant ;
ex1_Num = mkNum n20_Numeral ;
--- ex2_Num = mkNum 51 ;
ex3_Num = mkNum almost_AdN (mkNum n10_Numeral) ;
ex1_Ord = mkOrd n20_Numeral ;
--- ex2_Ord = mkOrd 51 ;
ex3_Ord = mkOrd good_A ;
ex1_AdN = mkAdN more_CAdv ;
ex1_Numeral = n1_Numeral ;
ex2_Numeral = n2_Numeral ;
ex3_Numeral = n3_Numeral ;
ex4_Numeral = n4_Numeral ;
ex5_Numeral = n5_Numeral ;
ex6_Numeral = n6_Numeral ;
ex7_Numeral = n7_Numeral ;
ex8_Numeral = n8_Numeral ;
ex9_Numeral = n9_Numeral ;
ex10_Numeral = n10_Numeral ;
ex11_Numeral = n20_Numeral ;
ex12_Numeral = n100_Numeral ;
ex13_Numeral = n1000_Numeral ;
ex1_CN = mkCN house_N ;
ex2_CN = mkCN mother_N2 john_NP ;
ex3_CN = mkCN distance_N3 (mkNP (mkDet this_Quant) city_N) (mkNP paris_PN) ;
ex4_CN = mkCN mother_N2 ;
ex5_CN = mkCN distance_N3 ;
ex6_CN = mkCN big_A house_N ;
ex7_CN = mkCN big_A (mkCN blue_A house_N) ;
ex8_CN = mkCN (mkAP very_AdA big_A) house_N ;
ex9_CN = mkCN (mkAP very_AdA big_A) (mkCN blue_A house_N) ;
ex10_CN = mkCN house_N (mkRS (mkRCl which_RP john_NP love_V2)) ;
ex11_CN = mkCN (mkCN big_A house_N) (mkRS (mkRCl which_RP john_NP love_V2)) ;
ex12_CN = mkCN house_N (mkAdv in_Prep (mkNP defSgDet city_N)) ;
ex13_CN = mkCN (mkCN big_A house_N) (mkAdv in_Prep (mkNP defSgDet city_N)) ;
ex14_CN = mkCN (mkCN rule_N) (mkS (mkCl john_NP walk_V)) ;
ex15_CN = mkCN (mkCN question_N) (mkQS (mkCl john_NP walk_V)) ;
ex16_CN = mkCN (mkCN reason_N) (mkVP walk_V) ;
ex17_CN = mkCN king_N john_NP ;
ex18_CN = mkCN (mkCN old_A king_N) john_NP ;
ex1_AP = mkAP old_A ;
ex2_AP = mkAP old_A john_NP ;
ex3_AP = mkAP married_A2 (mkNP she_Pron) ;
ex4_AP = mkAP married_A2 ;
ex5_AP = mkAP (mkAP probable_AS) (mkS (mkCl john_NP walk_V)) ;
ex6_AP = mkAP (mkAP uncertain_A) (mkQS (mkCl john_NP walk_V)) ;
ex7_AP = mkAP (mkAP ready_A) (mkVP walk_V) ;
ex8_AP = mkAP very_AdA old_A ;
ex9_AP = mkAP very_AdA (mkAP very_AdA old_A) ;
ex10_AP = mkAP and_Conj (mkAP old_A) (mkAP big_A) ;
ex11_AP = mkAP and_Conj (mkListAP (mkAP old_A) (mkListAP (mkAP big_A) (mkAP warm_A)));
ex12_AP = mkAP either7or_DConj (mkAP old_A) (mkAP big_A) ;
ex13_AP = mkAP either7or_DConj (mkListAP (mkAP old_A) (mkListAP (mkAP big_A) (mkAP warm_A)));
ex1_Adv = mkAdv warm_A ;
ex2_Adv = mkAdv with_Prep john_NP ;
ex3_Adv = mkAdv when_Subj (mkS (mkCl john_NP walk_V)) ;
ex4_Adv = mkAdv more_CAdv warm_A john_NP ;
ex5_Adv = mkAdv more_CAdv warm_A (mkS (mkCl john_NP walk_V)) ;
ex6_Adv = mkAdv very_AdA (mkAdv warm_A) ;
ex7_Adv = mkAdv and_Conj here_Adv now_Adv ;
ex8_Adv = mkAdv and_Conj (mkListAdv (mkAdv with_Prep john_NP) (mkListAdv here_Adv now_Adv)) ;
ex9_Adv = mkAdv either7or_DConj here_Adv now_Adv ;
ex10_Adv = mkAdv either7or_DConj (mkListAdv (mkAdv with_Prep john_NP) (mkListAdv here_Adv now_Adv)) ;
ex1_QS = mkQS (mkQCl whoSg_IP (mkVP walk_V)) ;
ex2_QS = mkQS conditionalTense anteriorAnt negativePol (mkQCl whoSg_IP (mkVP walk_V)) ;
ex3_QS = mkQS (mkCl john_NP walk_V) ;
ex1_QCl = mkQCl (mkCl john_NP walk_V) ;
ex2_QCl = mkQCl whoSg_IP (mkVP walk_V) ;
ex3_QCl = mkQCl whoSg_IP john_NP love_V2 ;
ex4_QCl = mkQCl whoSg_IP (mkSlash (mkSlash john_NP love_V2) today_Adv) ;
ex5_QCl = mkQCl why_IAdv (mkCl john_NP walk_V) ;
ex6_QCl = mkQCl with_Prep whoSg_IP (mkCl john_NP walk_V) ;
ex7_QCl = mkQCl where_IAdv john_NP ;
ex8_QCl = mkQCl whatSg_IP ;
ex1_IP = mkIP whichSg_IDet city_N ;
ex2_IP = mkIP whichPl_IDet (mkNum n5_Numeral) (mkOrd good_A) (mkCN city_N) ;
ex3_IP = mkIP whoSg_IP (mkAdv in_Prep (mkNP paris_PN)) ;
ex1_IAdv = mkIAdv in_Prep (mkIP whichSg_IDet city_N) ;
ex1_RS = mkRS (mkRCl which_RP (mkVP walk_V)) ;
ex2_RS = mkRS conditionalTense anteriorAnt negativePol (mkRCl which_RP (mkVP walk_V)) ;
ex1_RCl = mkRCl which_RP (mkVP walk_V) ;
ex2_RCl = mkRCl which_RP john_NP love_V2 ;
ex3_RCl = mkRCl which_RP (mkSlash (mkSlash john_NP love_V2) today_Adv) ;
ex4_RCl = mkRCl (mkCl john_NP love_V2 (mkNP she_Pron)) ;
ex1_RP = which_RP ;
ex2_RP = mkRP in_Prep (mkNP all_Predet (mkNP defPlDet house_N)) which_RP ;
ex1_Slash = mkSlash john_NP love_V2 ;
ex2_Slash = mkSlash john_NP want_VV see_V2 ;
ex3_Slash = mkSlash (mkCl john_NP walk_V) with_Prep ;
ex4_Slash = mkSlash (mkSlash john_NP love_V2) today_Adv ;
ex1_ListS = mkListS (mkS (mkCl john_NP walk_V)) (mkS (mkCl (mkNP i_Pron) run_V)) ;
ex2_ListS = mkListS (mkS (mkCl john_NP walk_V)) (mkListS (mkS (mkCl (mkNP i_Pron) run_V)) (mkS (mkCl (mkNP youSg_Pron) sleep_V))) ;
ex1_ListAP = mkListAP (mkAP old_A) (mkAP big_A) ;
ex2_ListAP = mkListAP (mkAP old_A) (mkListAP (mkAP big_A) (mkAP warm_A)) ;
ex1_ListAdv = mkListAdv here_Adv now_Adv ;
ex2_ListAdv = mkListAdv (mkAdv with_Prep john_NP) (mkListAdv here_Adv now_Adv) ;
ex1_ListNP = mkListNP john_NP (mkNP i_Pron) ;
ex2_ListNP = mkListNP john_NP (mkListNP (mkNP i_Pron) that_NP) ;
utt u = mkUtt u ; -- a hack to linearize VPs
oper
john_PN = paris_PN ; ----
today_Adv = here_Adv ; ----
john_NP = mkNP john_PN ;
}

2
lib/resource-1.0/api/examples/ExxSwe.gf
View File

@@ -1,6 +1,6 @@
--# -path=.:..:alltenses:prelude
concrete ExxSwe of Exx = CatSwe-[VP] ** ExxI with
concrete ExxSwe of Exx = CatSwe-[VP], ConjunctionSwe-[VP] ** ExxI with
(Lang = LangSwe),
(Constructors = ConstructorsSwe) ;

9
lib/resource-1.0/api/examples/Makefile Normal file
View File

@@ -0,0 +1,9 @@
Eng:
gf -nocpu ExxEng.gf <exx.gfs >exxEng.txt
Fin:
gf -nocpu ExxFin.gf <exx.gfs >exxFin.txt
Swe:
gf -nocpu ExxSwe.gf <exx.gfs >exxSwe.txt
gfs:
runghc mkgfs.hs