From 9ab29b205d63bc4cccaf1a1a79e26b6fe4842b29 Mon Sep 17 00:00:00 2001 From: aarne Date: Wed, 19 Dec 2007 07:05:02 +0000 Subject: [PATCH] Janna's examples updated --- lib/resource/Examples/Examples.gf | 10 ++ lib/resource/Examples/ExamplesEng.gf | 6 ++ lib/resource/Examples/ExamplesFin.gf | 6 ++ lib/resource/Examples/ExamplesFre.gf | 6 ++ lib/resource/Examples/ExamplesGer.gf | 6 ++ lib/resource/Examples/ExamplesI.gf | 135 +++++++++++++++++++++++++++ lib/resource/Examples/ExamplesIta.gf | 6 ++ lib/resource/Examples/ExamplesSwe.gf | 6 ++ lib/resource/Examples/ResExamples.gf | 50 +++++----- 9 files changed, 206 insertions(+), 25 deletions(-) create mode 100644 lib/resource/Examples/Examples.gf create mode 100644 lib/resource/Examples/ExamplesEng.gf create mode 100644 lib/resource/Examples/ExamplesFin.gf create mode 100644 lib/resource/Examples/ExamplesFre.gf create mode 100644 lib/resource/Examples/ExamplesGer.gf create mode 100644 lib/resource/Examples/ExamplesI.gf create mode 100644 lib/resource/Examples/ExamplesIta.gf create mode 100644 lib/resource/Examples/ExamplesSwe.gf diff --git a/lib/resource/Examples/Examples.gf b/lib/resource/Examples/Examples.gf new file mode 100644 index 000000000..1e020b2e0 --- /dev/null +++ b/lib/resource/Examples/Examples.gf @@ -0,0 +1,10 @@ +abstract Examples = { + +cat + Ex ; +fun + ex1, ex2, ex4, ex8, ex13, ex19, ex20, ex23, + ex3, ex5, ex6, ex7, ex10, ex12, ex14, ex15, ex16, ex24, ex25, ex26, ex27, + ex9, + ex11, ex17, ex18, ex21, ex22 : Ex ; +} diff --git a/lib/resource/Examples/ExamplesEng.gf b/lib/resource/Examples/ExamplesEng.gf new file mode 100644 index 000000000..053d9691c --- /dev/null +++ b/lib/resource/Examples/ExamplesEng.gf @@ -0,0 +1,6 @@ +--# -path=.:alltenses:prelude + +concrete ExamplesEng of Examples = ExamplesI with + (Syntax=SyntaxEng), + (Lang=LangEng) ; + diff --git a/lib/resource/Examples/ExamplesFin.gf b/lib/resource/Examples/ExamplesFin.gf new file mode 100644 index 000000000..cab786ea4 --- /dev/null +++ b/lib/resource/Examples/ExamplesFin.gf @@ -0,0 +1,6 @@ +--# -path=.:alltenses:prelude + +concrete ExamplesFin of Examples = ExamplesI with + (Syntax=SyntaxFin), + (Lang=LangFin) ; + diff --git a/lib/resource/Examples/ExamplesFre.gf b/lib/resource/Examples/ExamplesFre.gf new file mode 100644 index 000000000..20297ea2e --- /dev/null +++ b/lib/resource/Examples/ExamplesFre.gf @@ -0,0 +1,6 @@ +--# -path=.:alltenses:prelude + +concrete ExamplesFre of Examples = ExamplesI with + (Syntax=SyntaxFre), + (Lang=LangFre) ; + diff --git a/lib/resource/Examples/ExamplesGer.gf b/lib/resource/Examples/ExamplesGer.gf new file mode 100644 index 000000000..2c994df61 --- /dev/null +++ b/lib/resource/Examples/ExamplesGer.gf @@ -0,0 +1,6 @@ +--# -path=.:alltenses:prelude + +concrete ExamplesGer of Examples = ExamplesI with + (Syntax=SyntaxGer), + (Lang=LangGer) ; + diff --git a/lib/resource/Examples/ExamplesI.gf b/lib/resource/Examples/ExamplesI.gf new file mode 100644 index 000000000..d3e51f342 --- /dev/null +++ b/lib/resource/Examples/ExamplesI.gf @@ -0,0 +1,135 @@ +incomplete concrete ExamplesI of Examples = open Syntax,Lang in { + +lincat Ex = Text ; + +lin + ex1 = mkText (UttS (UseCl TPres ASimul PPos (PredVP (UsePron he_Pron) + (AdvVP (UseV sing_V) (AdAdv almost_AdA (PositAdvAdj correct_A)))))); + + ex2 = mkText (UttAdv (SubjS when_Subj (ConjS and_Conj (BaseS (UseCl TPast ASimul PPos + (PredVP everybody_NP (UseComp (CompAP (ConjAP and_Conj (BaseAP + (PositA young_A) (PositA beautiful_A))))))) (UseCl TPast ASimul PPos + (PredVP everything_NP (ComplVA become_VA (PositA probable_AS)))))))) ; + + ex3 = mkText (UseCl TPres ASimul PPos (CleftNP (PredetNP only_Predet + (DetCN (DetPl ( IndefArt) (NumDigits n2_Digits) NoOrd) (UseN woman_N))) + (UseRCl TCond ASimul PPos (RelSlash IdRP + (AdvSlash (SlashPrep (PredVP (UsePron i_Pron) (ComplVV want_VV + (PassV2 see_V2))) with_Prep) (PrepNP in_Prep (DetCN (DetSg + (DefArt) NoOrd) (UseN rain_N)))))))) ; + + ex4 = mkText (UttNP (DetCN someSg_Det (RelCN (UseN day_N) (UseRCl TFut ASimul PPos + (RelCl (ExistNP (AdvNP (DetCN (DetSg ( IndefArt) NoOrd) + (UseN peace_N)) (PrepNP on_Prep (DetCN (DetSg ( IndefArt) + NoOrd) (UseN earth_N)))))))))) ; + + ex5 = mkText (UseCl TPres ASimul PPos (PredVP (UsePron they_Pron) (AdvVP + (ProgrVP (UseV play_V)) (ComparAdvAdjS less_CAdv clever_A + (UseCl TPres ASimul PPos (GenericCl (UseV think_V))))))) ; + + ex6 = mkText (UseCl TPres ASimul PPos (CleftAdv (AdvSC (EmbedVP (AdVVP always_AdV + (UseV stop_V)))) (UseCl TPres ASimul PPos (PredVP (UsePron we_Pron) + (ComplV2 beg_V2V (UsePron youPl_Pron)))))) ; + + ex7 = mkText (UseCl TCond ASimul PNeg (PredVP (UsePron i_Pron) (ComplV3 give_V3 + (DetCN (DetPl ( IndefArt) (AdNum (AdnCAdv more_CAdv) + (NumNumeral (num (pot2as3 (pot1as2 (pot0as1 (pot0 n3))))))) NoOrd) + (UseN star_N)) (DetCN (DetSg ( this_Quant) NoOrd) + (UseN restaurant_N))))) ; + + ex8 = mkText (UttImpSg PPos (ImpVP (ComplV2A paint_V2A (DetCN (DetSg ( DefArt) + NoOrd) (UseN earth_N)) (DConjAP both7and_DConj (BaseAP (ComparA + small_A (DetCN (DetSg ( DefArt) NoOrd) (UseN sun_N))) + (ComparA big_A (DetCN (DetSg ( DefArt) NoOrd) (UseN moon_N + ))))))) ) ; + + ex9 = mkText (UseCl TPres ASimul PPos (PredVP everybody_NP (ComplVQ wonder_VQ + (UseQCl TPres ASimul PPos (QuestSlash whatSg_IP (SlashV2 (UsePron + youSg_Pron)love_V2)))))) ; + + ex10 = mkText (UseCl TPres ASimul PPos (PredSCVP (EmbedS (UseCl TPres ASimul PNeg + (PredVP (UsePron i_Pron) (UseComp (CompAP (ReflA2 married_A2)))))) + (ComplV2 kill_V2 (UsePron i_Pron)))) ; + + ex11 = (TQuestMark (PhrUtt (PConjConj and_Conj) (UttQS (UseQCl TPres ASimul + PNeg (QuestIAdv why_IAdv (PredVP (DetCN (DetSg MassDet NoOrd) + (UseN art_N)) (UseComp (CompAP (ComparA (UseA2 easy_A2V) + (DetCN (DetSg MassDet NoOrd) (UseN science_N))))))))) NoVoc) TEmpty) ; + + ex12 = mkText (UseCl TPres ASimul PPos (CleftNP (DetCN (DetSg ( IndefArt) + NoOrd) (UseN dog_N)) (UseRCl TPres ASimul PPos (RelSlash (FunRP + with_Prep (DetCN (DetSg ( IndefArt) NoOrd) (UseN friend_N)) + IdRP) (SlashVVV2 (DetCN (DetSg ( (PossPron i_Pron)) NoOrd) + (UseN2 brother_N2)) can_VV play_V2))))) ; + + ex13 = mkText (ImpPl1 (ComplVS hope_VS (DConjS either7or_DConj (BaseS (UseCl + TPres ASimul PPos (PredVP (DetCN (DetSg ( DefArt) NoOrd) + (ComplN2 father_N2 (DetCN (DetSg ( DefArt) NoOrd) + (UseN baby_N)))) (UseV run_V))) (UseCl TPres ASimul PPos (PredVP + (DetCN (DetSg ( DefArt) NoOrd)(UseN3 distance_N3)) + (UseComp (CompAP (PositA small_A))))))))) ; + + ex14 = mkText (UseCl TPres ASimul PNeg (PredVP (UsePron i_Pron) (AdvVP (ReflV2 + (UseVS fear_VS)) now_Adv))) ; + + ex15 = mkText (UseCl TPres ASimul PPos (PredVP (UsePron i_Pron) (ComplV2 (UseVQ + wonder_VQ) (ConjNP or_Conj (BaseNP somebody_NP something_NP))))) ; + + ex16 = mkText (UseCl TPres ASimul PPos (PredVP (DetCN every_Det (UseN baby_N)) + (UseComp (CompNP (DConjNP either7or_DConj (BaseNP (DetCN (DetSg + ( IndefArt) NoOrd) (UseN boy_N)) (DetCN (DetSg ( + IndefArt) NoOrd) (UseN girl_N)))))))) ; + + ex17 = (TQuestMark (PhrUtt NoPConj (UttQS (UseQCl TPres ASimul PPos (QuestVP + (IDetCN whichSg_IDet NoNum NoOrd (ApposCN (ComplN2 (ComplN3 distance_N3 + (DetCN (DetSg ( DefArt) NoOrd) (UseN house_N))) (DetCN (DetSg + ( DefArt) NoOrd) (UseN bank_N))) (DetCN (DetSg ( + DefArt) (OrdSuperl short_A)) (UseN road_N)))) (PassV2 find_V2)))) + NoVoc) TEmpty) ; + + ex18 = (TQuestMark (PhrUtt NoPConj ( UttQS (UseQCl TPres ASimul PPos + (QuestIComp (CompIAdv where_IAdv) (DetCN (DetSg ( DefArt) + NoOrd) (RelCN (UseN teacher_N) (UseRCl TPres ASimul PPos + (RelVP IdRP (ComplV3 sell_V3 (PPartNP (DetCN (DetPl ( DefArt) + NoNum NoOrd) (UseN book_N)) read_V2) (DetCN (DetPl ( IndefArt) + NoNum NoOrd) (UseN student_N)))))))))) NoVoc) TEmpty) ; + + ex19 = mkText (UttIAdv (PrepIP with_Prep (AdvIP whoSg_IP (ConjAdv and_Conj (BaseAdv + (PositAdvAdj cold_A) (PositAdvAdj warm_A)))))) ; + + ex20 = mkText (UttAdv (DConjAdv either7or_DConj (ConsAdv here7from_Adv (BaseAdv + there_Adv everywhere_Adv)))) ; + + ex21 = (TExclMark (PhrUtt NoPConj (UttImpPl PNeg (ImpVP (UseV die_V))) + please_Voc) TEmpty) ; + + ex22 = (TQuestMark (PhrUtt NoPConj (UttIP (IDetCN how8many_IDet NoNum NoOrd + (UseN year_N))) (VocNP (DetCN (DetSg ( (PossPron i_Pron)) + NoOrd) (UseN friend_N)))) TEmpty) ; + + ex23 = mkText (UttVP (PassV2 know_V2)) ; + + ex24 = mkText (UseCl TPres ASimul PPos (PredVP (DetCN (DetSg MassDet NoOrd) (SentCN + (UseN song_N) (EmbedVP (UseV sing_V)))) (UseComp (CompAP + (PositA (UseA2 easy_A2V)))))) ; + + ex25 = mkText (UseCl TPast ASimul PNeg (PredVP (UsePron she_Pron) (ComplV2 know_V2 + (DetCN (DetSg MassDet NoOrd) (AdvCN (UseN industry_N) (PrepNP + before_Prep (DetCN (DetSg ( DefArt) NoOrd) (UseN university_N)))))))) ; + + ex26 = mkText (UseCl TPres ASimul PPos (PredVP (UsePron she_Pron) (UseComp (CompAP + (AdAP almost_AdA (SentAP (ComplA2 married_A2 (DetCN (DetSg ( + (PossPron she_Pron)) NoOrd) (UseN cousin_N))) (EmbedQS (UseQCl + TPast ASimul PPos (QuestCl (PredVP (UsePron youPol_Pron) + (ComplV2 watch_V2 (DetCN (DetSg ( DefArt) NoOrd) + (UseN television_N))))))))))))) ; + + ex27 = mkText (UseCl TPres ASimul PPos (ImpersCl (ComplVV can8know_VV (UseComp + (CompAdv (PositAdvAdj important_A)))))) ; +} + + + + + + diff --git a/lib/resource/Examples/ExamplesIta.gf b/lib/resource/Examples/ExamplesIta.gf new file mode 100644 index 000000000..e1a7f9b5b --- /dev/null +++ b/lib/resource/Examples/ExamplesIta.gf @@ -0,0 +1,6 @@ +--# -path=.:alltenses:prelude + +concrete ExamplesIta of Examples = ExamplesI with + (Syntax=SyntaxIta), + (Lang=LangIta) ; + diff --git a/lib/resource/Examples/ExamplesSwe.gf b/lib/resource/Examples/ExamplesSwe.gf new file mode 100644 index 000000000..820258b22 --- /dev/null +++ b/lib/resource/Examples/ExamplesSwe.gf @@ -0,0 +1,6 @@ +--# -path=.:alltenses:prelude + +concrete ExamplesSwe of Examples = ExamplesI with + (Syntax=SyntaxSwe), + (Lang=LangSwe) ; + diff --git a/lib/resource/Examples/ResExamples.gf b/lib/resource/Examples/ResExamples.gf index 4fec2d845..444d759c8 100644 --- a/lib/resource/Examples/ResExamples.gf +++ b/lib/resource/Examples/ResExamples.gf @@ -17,16 +17,16 @@ def (PredVP everything_NP (ComplVA become_VA (PositA probable_AS))))))); ex3 = UseCl TPres ASimul PPos (CleftNP (PredetNP only_Predet - (DetCN (DetPl (PlQuant IndefArt) (NumInt 2) NoOrd) (UseN woman_N))) + (DetCN (DetPl ( IndefArt) (NumInt 2) NoOrd) (UseN woman_N))) (UseRCl TCond ASimul PPos (RelSlash IdRP (AdvSlash (SlashPrep (PredVP (UsePron i_Pron) (ComplVV want_VV (PassV2 see_V2))) with_Prep) (PrepNP in_Prep (DetCN (DetSg - (SgQuant DefArt) NoOrd) (UseN rain_N))))))); + (DefArt) NoOrd) (UseN rain_N))))))); ex4 = UttNP (DetCN someSg_Det (RelCN (UseN day_N) (UseRCl TFut ASimul PPos - (RelCl (ExistNP (AdvNP (DetCN (DetSg (SgQuant IndefArt) NoOrd) - (UseN peace_N)) (PrepNP on_Prep (DetCN (DetSg (SgQuant IndefArt) + (RelCl (ExistNP (AdvNP (DetCN (DetSg ( IndefArt) NoOrd) + (UseN peace_N)) (PrepNP on_Prep (DetCN (DetSg ( IndefArt) NoOrd) (UseN earth_N))))))))); ex5 = UseCl TPres ASimul PPos (PredVP (UsePron they_Pron) (AdvVP @@ -38,15 +38,15 @@ def (ComplV2 beg_V2V (UsePron youPl_Pron))))); ex7 = UseCl TCond ASimul PNeg (PredVP (UsePron i_Pron) (ComplV3 give_V3 - (DetCN (DetPl (PlQuant IndefArt) (AdNum (AdnCAdv more_CAdv) + (DetCN (DetPl ( IndefArt) (AdNum (AdnCAdv more_CAdv) (NumNumeral (num (pot2as3 (pot1as2 (pot0as1 (pot0 n3))))))) NoOrd) - (UseN star_N)) (DetCN (DetSg (SgQuant this_Quant) NoOrd) + (UseN star_N)) (DetCN (DetSg ( this_Quant) NoOrd) (UseN restaurant_N)))); - ex8 = UttImpSg PPos (ImpVP (ComplV2A paint_V2A (DetCN (DetSg (SgQuant DefArt) + ex8 = UttImpSg PPos (ImpVP (ComplV2A paint_V2A (DetCN (DetSg ( DefArt) NoOrd) (UseN earth_N)) (DConjAP both7and_DConj (BaseAP (ComparA - small_A (DetCN (DetSg (SgQuant DefArt) NoOrd) (UseN sun_N))) - (ComparA big_A (DetCN (DetSg (SgQuant DefArt) NoOrd) (UseN moon_N + small_A (DetCN (DetSg ( DefArt) NoOrd) (UseN sun_N))) + (ComparA big_A (DetCN (DetSg ( DefArt) NoOrd) (UseN moon_N ))))))) ; ex9 = UseCl TPres ASimul PPos (PredVP everybody_NP (ComplVQ wonder_VQ @@ -62,17 +62,17 @@ def (UseN art_N)) (UseComp (CompAP (ComparA (UseA2 easy_A2V) (DetCN (DetSg MassDet NoOrd) (UseN science_N))))))))) NoVoc) TEmpty; - ex12 = UseCl TPres ASimul PPos (CleftNP (DetCN (DetSg (SgQuant IndefArt) + ex12 = UseCl TPres ASimul PPos (CleftNP (DetCN (DetSg ( IndefArt) NoOrd) (UseN dog_N)) (UseRCl TPres ASimul PPos (RelSlash (FunRP - with_Prep (DetCN (DetSg (SgQuant IndefArt) NoOrd) (UseN friend_N)) - IdRP) (SlashVVV2 (DetCN (DetSg (SgQuant (PossPron i_Pron)) NoOrd) + with_Prep (DetCN (DetSg ( IndefArt) NoOrd) (UseN friend_N)) + IdRP) (SlashVVV2 (DetCN (DetSg ( (PossPron i_Pron)) NoOrd) (UseN2 brother_N2)) can_VV play_V2)))); ex13 = ImpPl1 (ComplVS hope_VS (DConjS either7or_DConj (BaseS (UseCl - TPres ASimul PPos (PredVP (DetCN (DetSg (SgQuant DefArt) NoOrd) - (ComplN2 father_N2 (DetCN (DetSg (SgQuant DefArt) NoOrd) + TPres ASimul PPos (PredVP (DetCN (DetSg ( DefArt) NoOrd) + (ComplN2 father_N2 (DetCN (DetSg ( DefArt) NoOrd) (UseN baby_N)))) (UseV run_V))) (UseCl TPres ASimul PPos (PredVP - (DetCN (DetSg (SgQuant DefArt) NoOrd)(UseN3 distance_N3)) + (DetCN (DetSg ( DefArt) NoOrd)(UseN3 distance_N3)) (UseComp (CompAP (PositA small_A)))))))); ex14 = UseCl TPres ASimul PNeg (PredVP (UsePron i_Pron) (AdvVP (ReflV2 @@ -83,21 +83,21 @@ def ex16 = UseCl TPres ASimul PPos (PredVP (DetCN every_Det (UseN baby_N)) (UseComp (CompNP (DConjNP either7or_DConj (BaseNP (DetCN (DetSg - (SgQuant IndefArt) NoOrd) (UseN boy_N)) (DetCN (DetSg (SgQuant + ( IndefArt) NoOrd) (UseN boy_N)) (DetCN (DetSg ( IndefArt) NoOrd) (UseN girl_N))))))); ex17 = TQuestMark (PhrUtt NoPConj (UttQS (UseQCl TPres ASimul PPos (QuestVP (IDetCN whichSg_IDet NoNum NoOrd (ApposCN (ComplN2 (ComplN3 distance_N3 - (DetCN (DetSg (SgQuant DefArt) NoOrd) (UseN house_N))) (DetCN (DetSg - (SgQuant DefArt) NoOrd) (UseN bank_N))) (DetCN (DetSg (SgQuant + (DetCN (DetSg ( DefArt) NoOrd) (UseN house_N))) (DetCN (DetSg + ( DefArt) NoOrd) (UseN bank_N))) (DetCN (DetSg ( DefArt) (OrdSuperl short_A)) (UseN road_N)))) (PassV2 find_V2)))) NoVoc) TEmpty; ex18 = TQuestMark (PhrUtt NoPConj ( UttQS (UseQCl TPres ASimul PPos - (QuestIComp (CompIAdv where_IAdv) (DetCN (DetSg (SgQuant DefArt) + (QuestIComp (CompIAdv where_IAdv) (DetCN (DetSg ( DefArt) NoOrd) (RelCN (UseN teacher_N) (UseRCl TPres ASimul PPos - (RelVP IdRP (ComplV3 sell_V3 (PPartNP (DetCN (DetPl (PlQuant DefArt) - NoNum NoOrd) (UseN book_N)) read_V2) (DetCN (DetPl (PlQuant IndefArt) + (RelVP IdRP (ComplV3 sell_V3 (PPartNP (DetCN (DetPl ( DefArt) + NoNum NoOrd) (UseN book_N)) read_V2) (DetCN (DetPl ( IndefArt) NoNum NoOrd) (UseN student_N)))))))))) NoVoc) TEmpty; ex19 = UttIAdv (PrepIP with_Prep (AdvIP whoSg_IP (ConjAdv and_Conj (BaseAdv @@ -110,7 +110,7 @@ def please_Voc) TEmpty; ex22 = TQuestMark (PhrUtt NoPConj (UttIP (IDetCN how8many_IDet NoNum NoOrd - (UseN year_N))) (VocNP (DetCN (DetSg (SgQuant (PossPron i_Pron)) + (UseN year_N))) (VocNP (DetCN (DetSg ( (PossPron i_Pron)) NoOrd) (UseN friend_N)))) TEmpty; ex23 = UttVP (PassV2 know_V2); @@ -121,13 +121,13 @@ def ex25 = UseCl TPast ASimul PNeg (PredVP (UsePron she_Pron) (ComplV2 know_V2 (DetCN (DetSg MassDet NoOrd) (AdvCN (UseN industry_N) (PrepNP - before_Prep (DetCN (DetSg (SgQuant DefArt) NoOrd) (UseN university_N))))))); + before_Prep (DetCN (DetSg ( DefArt) NoOrd) (UseN university_N))))))); ex26 = UseCl TPres ASimul PPos (PredVP (UsePron she_Pron) (UseComp (CompAP - (AdAP almost_AdA (SentAP (ComplA2 married_A2 (DetCN (DetSg (SgQuant + (AdAP almost_AdA (SentAP (ComplA2 married_A2 (DetCN (DetSg ( (PossPron she_Pron)) NoOrd) (UseN cousin_N))) (EmbedQS (UseQCl TPast ASimul PPos (QuestCl (PredVP (UsePron youPol_Pron) - (ComplV2 watch_V2 (DetCN (DetSg (SgQuant DefArt) NoOrd) + (ComplV2 watch_V2 (DetCN (DetSg ( DefArt) NoOrd) (UseN television_N)))))))))))); ex27 = UseCl TPres ASimul PPos (ImpersCl (ComplVV can8know_VV (UseComp