1
0
forked from GitHub/gf-core

resource lib name changed

This commit is contained in:
aarne
2007-12-12 20:30:11 +00:00
parent f472bf266c
commit 4ea58bce2c
741 changed files with 0 additions and 0 deletions

View File

@@ -0,0 +1,139 @@
--# -path=.:../abstract:../../prelude
abstract ResExamples = Lang ** {
fun
ex1, ex2, ex4, ex8, ex13, ex19, ex20, ex23: Utt;
ex3, ex5, ex6, ex7, ex10, ex12, ex14, ex15, ex16, ex24, ex25, ex26, ex27: S;
ex9: Phr;
ex11, ex17, ex18, ex21, ex22 : Text;
def
ex1 = UttS (UseCl TPres ASimul PPos (PredVP (UsePron he_Pron)
(AdvVP (UseV sing_V) (AdAdv almost_AdA (PositAdvAdj correct_A)))));
ex2 = 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 = UseCl TPres ASimul PPos (CleftNP (PredetNP only_Predet
(DetCN (DetPl (PlQuant 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)))))));
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)
NoOrd) (UseN earth_N)))))))));
ex5 = 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 = 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 = UseCl TCond ASimul PNeg (PredVP (UsePron i_Pron) (ComplV3 give_V3
(DetCN (DetPl (PlQuant IndefArt) (AdNum (AdnCAdv more_CAdv)
(NumNumeral (num (pot2as3 (pot1as2 (pot0as1 (pot0 n3))))))) NoOrd)
(UseN star_N)) (DetCN (DetSg (SgQuant this_Quant) NoOrd)
(UseN restaurant_N))));
ex8 = UttImpSg PPos (ImpVP (ComplV2A paint_V2A (DetCN (DetSg (SgQuant 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
))))))) ;
ex9 = UseCl TPres ASimul PPos (PredVP everybody_NP (ComplVQ wonder_VQ
(UseQCl TPres ASimul PPos (QuestSlash whatSg_IP (SlashV2 (UsePron
youSg_Pron)love_V2)))));
ex10 = 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 = UseCl TPres ASimul PPos (CleftNP (DetCN (DetSg (SgQuant 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)
(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)
(UseN baby_N)))) (UseV run_V))) (UseCl TPres ASimul PPos (PredVP
(DetCN (DetSg (SgQuant DefArt) NoOrd)(UseN3 distance_N3))
(UseComp (CompAP (PositA small_A))))))));
ex14 = UseCl TPres ASimul PNeg (PredVP (UsePron i_Pron) (AdvVP (ReflV2
(UseVS fear_VS)) now_Adv));
ex15 = UseCl TPres ASimul PPos (PredVP (UsePron i_Pron) (ComplV2 (UseVQ
wonder_VQ) (ConjNP or_Conj (BaseNP somebody_NP something_NP))));
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 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
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)
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)
NoNum NoOrd) (UseN student_N)))))))))) NoVoc) TEmpty;
ex19 = UttIAdv (PrepIP with_Prep (AdvIP whoSg_IP (ConjAdv and_Conj (BaseAdv
(PositAdvAdj cold_A) (PositAdvAdj warm_A)))));
ex20 = 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 (SgQuant (PossPron i_Pron))
NoOrd) (UseN friend_N)))) TEmpty;
ex23 = UttVP (PassV2 know_V2);
ex24 = UseCl TPres ASimul PPos (PredVP (DetCN (DetSg MassDet NoOrd) (SentCN
(UseN song_N) (EmbedVP (UseV sing_V)))) (UseComp (CompAP
(PositA (UseA2 easy_A2V)))));
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)))))));
ex26 = UseCl TPres ASimul PPos (PredVP (UsePron she_Pron) (UseComp (CompAP
(AdAP almost_AdA (SentAP (ComplA2 married_A2 (DetCN (DetSg (SgQuant
(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)
(UseN television_N))))))))))));
ex27 = UseCl TPres ASimul PPos (ImpersCl (ComplVV can8know_VV (UseComp
(CompAdv (PositAdvAdj important_A)))));
}

View File

@@ -0,0 +1,33 @@
--# -path=.:../abstract:../english:../common:../../prelude
concrete ResExamplesEng of ResExamples = LangEng ** {
lin
ex1 = {s = ["Example 1."]};
ex2 = {s = ["Example 2."]};
ex3 = {s = ["Example 3."]};
ex4 = {s = ["Example 4."]};
ex5 = {s = ["Example 5."]};
ex6 = {s = ["Example 6."]};
ex7 = {s = ["Example 7."]};
ex8 = {s = ["Example 8."]};
ex9 = {s = ["Example 9."]};
ex10 = {s = ["Example 10."]};
ex11 = {s = ["Example 11."]};
ex12 = {s = ["Example 12."]};
ex13 = {s = ["Example 13."]};
ex14 = {s = ["Example 14."]};
ex15 = {s = ["Example 15."]};
ex16 = {s = ["Example 16."]};
ex17 = {s = ["Example 17."]};
ex18 = {s = ["Example 18."]};
ex19 = {s = ["Example 19."]};
ex20 = {s = ["Example 20."]};
ex21 = {s = ["Example 21."]};
ex22 = {s = ["Example 22."]};
ex23 = {s = ["Example 23."]};
ex24 = {s = ["Example 24."]};
ex25 = {s = ["Example 25."]};
ex26 = {s = ["Example 26."]};
ex27 = {s = ["Example 27."]};
}

View File

@@ -0,0 +1,34 @@
--# -path=.:../abstract:../russian:../common:../../prelude
concrete ResExamplesRus of ResExamples = LangRus ** {
lin
ex1 = {s = ["Example 1."]};
ex2 = {s = ["Example 2."]};
ex3 = {s = ["Example 3."]};
ex4 = {s = ["Example 4."]};
ex5 = {s = ["Example 5."]};
ex6 = {s = ["Example 6."]};
ex7 = {s = ["Example 7."]};
ex8 = {s = ["Example 8."]};
ex9 = {s = ["Example 9."]};
ex10 = {s = ["Example 10."]};
ex11 = {s = ["Example 11."]};
ex12 = {s = ["Example 12."]};
ex13 = {s = ["Example 13."]};
ex14 = {s = ["Example 14."]};
ex15 = {s = ["Example 15."]};
ex16 = {s = ["Example 16."]};
ex17 = {s = ["Example 17."]};
ex18 = {s = ["Example 18."]};
ex19 = {s = ["Example 19."]};
ex20 = {s = ["Example 20."]};
ex21 = {s = ["Example 21."]};
ex22 = {s = ["Example 22."]};
ex23 = {s = ["Example 23."]};
ex24 = {s = ["Example 24."]};
ex25 = {s = ["Example 25."]};
ex26 = {s = ["Example 26."]};
ex27 = {s = ["Example 27."]};
}

View File

@@ -0,0 +1,86 @@
--include test.Abs.gf;
include ../test.Abs.gf;
cat Text ;
fun
onePhraseText : Phr -> Text ;
combine: Text -> Text -> Text ;
ex1, ex2, ex3, ex4, ex5, ex6, ex7, ex8, ex9, ex10, ex11,
ex12, ex13, ex14, ex15, ex16, ex17, ex18, ex19: Text ;
russian : Adj1 ;
parkedNear : Adj2 ;
def
ex1 = onePhraseText (IndicPhrase (PredVP HeNP (PosVS Say (PredVP ThouNP (AdvVP (PosV Run ) Well))))) ;
ex2 = onePhraseText (IndicPhrase (PredVP SheNP (NegTV Send (DefOneNP (ModAdj (ConjAP OrConj (ConsAP
(TwoAP (PositAdjP Big ) (PositAdjP Small ) ) (ConjDAP EitherOr
(TwoAP (PositAdjP Old ) (PositAdjP Young ) ) ) ) ) (UseN Car)))))) ;
ex3 = onePhraseText (IndicPhrase (SubjS IfSubj (PredVP (UsePN John ) (AdvVP (NegV Walk ) Always )) (PredVP
WeNP (AdvVP (PosTV SwitchOn (IndefOneNP (UseN Light ) ))
(LocNP (DetNP EveryDet (ModAdj (PositAdjP Old ) (UseN House ))))))));
ex4 = onePhraseText (IndicPhrase (ConjDS EitherOr (TwoS (PredVP TheyNP (PosA (ComparAdjP Young YeNP )))
(PredVP INP (PosCN (AppFun Mother (SuperlNP Big (UseN Man ))))))));
ex5 = onePhraseText (IndicPhrase (PredVP (ModGenMany YeNP (AdvCN (UseFun
Mother ) Always ) ) (PosVS Prove (PredVP YeNP (PosA (PositAdjP
Small) ) ) ) ) );
ex6 = onePhraseText (IndicPhrase (PredVP (IndefManyNP (ModRC (UseN Man ) ( RelSuch ( PredVP (ModGenMany
TheyNP(UseFun Uncle ) ) (PosTV Love(ConjDNP NeitherNor (TwoNP
(DefManyNP (UseN Car )) (DefManyNP (UseN House ) ) ))) ) ) ) )
(NegA (PositAdjP Old )))) ;
ex7 = onePhraseText (QuestPhrase (SubjQu WhenSubj (PredVP (IndefOneNP
(ModRC (UseN Man ) (RelVP IdRP (NegV Run ))))(PosV Walk ))
(IntVP WhoOne (PosV Run ) ) ) ) ;
ex8 = onePhraseText (IndicPhrase (ConjS AndConj (ConsS (TwoS
(PredVP (DefOneNP (UseN Car)) (NegA (PositAdjP Big )))
(PredVP (DefOneNP (UseN House)) (PosA (PositAdjP Small ))))
(PredVP SheNP (PosA (PositAdjP Old)) )))) ;
ex9 = onePhraseText (ImperMany (SubjImper WhenSubj (PredVP YeNP
(PosA (PositAdjP Young ) ) ) (ImperVP (PosV Walk) ) ) );
ex10 = onePhraseText (QuestPhrase (IntSlash (FunIP Uncle (NounIPMany
(UseN Woman ) ) ) (PosSlashTV INP Wait ) ) ) ;
ex11 = onePhraseText (QuestPhrase (QuestAdv WhyIAdv TheyNP (PosTV
Love (UsePN Mary ) ) ) ) ;
ex12 = onePhraseText (QuestPhrase (QuestVP WeNP (PosCN (UseN Man ) ) ) );
ex13 = combine (combine (onePhraseText PhrYes ) (onePhraseText
(PhrNP (DetNP MostDet (UseN Car ) ) ) ) ) (combine
(onePhraseText (PhrManyCN (ModAdj (PositAdjP Old ) (UseN House
) ) ) ) (onePhraseText (PhrIAdv HowIAdv ) ) ) ;
ex14 = onePhraseText (IndicPhrase (PredVP SheNP (PosNP (IndefOneNP (ModRC
(UseN Woman) (RelSlash(FunRP Mother IdRP)(PosSlashTV HeNP Wait)))))));
ex15 = onePhraseText (IndicPhrase (PredVP (ConjNP OrConj (ConsNP (TwoNP
(UsePN Mary ) (UsePN John ) ) (ConjDNP EitherOr (TwoNP YouNP INP
) ) ) ) (PosA (PositAdjP Young ) ) ) );
ex16 = onePhraseText (IndicPhrase (PredVP INP (PosTV Love (ConjNP AndConj
(TwoNP (IndefManyNP (ModAdj (PositAdjP Old ) (UseN House )))
(IndefManyNP (ModAdj (PositAdjP Young) (UseN Woman ) ))))))) ;
ex18 = combine ex1 (combine ex2 (combine ex3 (combine ex4 (combine ex5
(combine ex6 (combine ex7 (combine ex8 (combine ex9 (combine ex10
(combine ex11 (combine ex12 (combine ex14 (combine ex15
( combine ex16 ex13)))))))))))))) ;
ex17 = onePhraseText (PhrManyCN (ModAdj (ComplAdj parkedNear (DefOneNP
(ModAdj (AdjP1 russian ) (UseN House ) ) ) )(UseN Car ) ) ) ;
ex19 = combine ex1 (combine ex2 (combine ex3 (combine ex4 (combine ex5
(combine ex6 (combine ex7 (combine ex8 (combine ex9 (combine ex10
(combine ex11 (combine ex12 (combine ex14 (combine ex15
( combine ex16 (combine ex17 ex13))))))))))))))) ;

View File

@@ -0,0 +1,33 @@
include
examples.Abs.gf;
-- test.Deu.gf;
../test.Deu.gf;
lincat
Text = SS;
lin
onePhraseText t = t ;
combine txt1 txt2 = { s = txt1.s ++ "<p>" ++ txt2.s } ;
-- combine txt1 txt2 = { s = txt1.s ++ txt2.s } ;
ex1 = {s = ["Beispiel 1."]};
ex2 = {s = ["Beispiel 2."]};
ex3 = {s = ["Beispiel 3."]};
ex4 = {s = ["Beispiel 4."]};
ex5 = {s = ["Beispiel 5."]};
ex6 = {s = ["Beispiel 6."]};
ex7 = {s = ["Beispiel 7."]};
ex8 = {s = ["Beispiel 8."]};
ex9 = {s = ["Beispiel 9."]};
ex10 = {s = ["Beispiel 10."]};
ex11 = {s = ["Beispiel 11."]};
ex12 = {s = ["Beispiel 12."]};
ex13 = {s = ["Beispiel 13."]};
ex14 = {s = ["Beispiel 14."]};
ex15 = {s = ["Beispiel 15."]};
ex16 = {s = ["Beispiel 16."]};
ex17 = {s = ["Beispiel 17."]};
ex18 = {s = ["Beispiel 18. A combination of ex1-ex16"]};
ex19 = {s = ["Beispiel 19. A combination of ex1-ex17"]};

View File

@@ -0,0 +1,33 @@
include
examples.Abs.gf;
-- test.Eng.gf;
../test.Eng.gf;
lincat
Text = SS;
lin
onePhraseText t = t ;
combine txt1 txt2 = { s = txt1.s ++ "<p>" ++ txt2.s } ;
russian = simpleAdj "Russian";
parkedNear = (simpleAdj "parked") ** { s2 = "near" };
ex1 = {s = ["Example 1."]};
ex2 = {s = ["Example 2."]};
ex3 = {s = ["Example 3."]};
ex4 = {s = ["Example 4."]};
ex5 = {s = ["Example 5."]};
ex6 = {s = ["Example 6."]};
ex7 = {s = ["Example 7."]};
ex8 = {s = ["Example 8."]};
ex9 = {s = ["Example 9."]};
ex10 = {s = ["Example 10."]};
ex11 = {s = ["Example 11."]};
ex12 = {s = ["Example 12."]};
ex13 = {s = ["Example 13."]};
ex14 = {s = ["Example 14."]};
ex15 = {s = ["Example 15."]};
ex16 = {s = ["Example 16."]};
ex17 = {s = ["Example 17."]};
ex18 = {s = ["Example 18. A combination of ex1-ex16"]};
ex19 = {s = ["Example 19. A combination of ex1-ex17"]};

View File

@@ -0,0 +1,35 @@
include
examples.Abs.gf;
-- test.Fra.gf;
../test.Fra.gf;
lincat
Text = SS;
lin
onePhraseText t = t ;
combine txt1 txt2 = { s = txt1.s ++ "<p>" ++ txt2.s } ;
-- combine txt1 txt2 = { s = txt1.s ++ txt2.s } ;
russian = mkAdjective (adjJeune "russe") adjPost ;
parkedNear = mkAdjective (adjGrand "garé") adjPost **
{s2 = "prés"; c = genitive};
ex1 = {s = ["Example 1."]};
ex2 = {s = ["Exemple 2."]};
ex3 = {s = ["Exemple 3."]};
ex4 = {s = ["Exemple 4."]};
ex5 = {s = ["Exemple 5."]};
ex6 = {s = ["Exemple 6."]};
ex7 = {s = ["Exemple 7."]};
ex8 = {s = ["Exemple 8."]};
ex9 = {s = ["Exemple 9."]};
ex10 = {s = ["Exemple 10."]};
ex11 = {s = ["Exemple 11."]};
ex12 = {s = ["Exemple 12."]};
ex13 = {s = ["Exemple 13."]};
ex14 = {s = ["Exemple 14."]};
ex15 = {s = ["Exemple 15."]};
ex16 = {s = ["Exemple 16."]};
ex17 = {s = ["Exemple 17."]};
ex18 = {s = ["Exemple 18. Une combination de ex1-ex16"]};
ex19 = {s = ["Exemple 19. Une combination de ex1-ex17"]};

View File

@@ -0,0 +1,33 @@
include
examples.Abs.gf;
-- test.Ita.gf;
../test.Ita.gf;
lincat
Text = SS;
lin
onePhraseText t = t ;
combine txt1 txt2 = { s = txt1.s ++ "<p>" ++ txt2.s } ;
-- combine txt1 txt2 = { s = txt1.s ++ txt2.s } ;
ex1 = {s = ["Esempio 1."]};
ex2 = {s = ["Esempio 2."]};
ex3 = {s = ["Esempio 3."]};
ex4 = {s = ["Esempio 4."]};
ex5 = {s = ["Esempio 5."]};
ex6 = {s = ["Esempio 6."]};
ex7 = {s = ["Esempio 7."]};
ex8 = {s = ["Esempio 8."]};
ex9 = {s = ["Esempio 9."]};
ex10 = {s = ["Esempio 10."]};
ex11 = {s = ["Esempio 11."]};
ex12 = {s = ["Esempio 12."]};
ex13 = {s = ["Esempio 13."]};
ex14 = {s = ["Esempio 14."]};
ex15 = {s = ["Esempio 15."]};
ex16 = {s = ["Esempio 16."]};
ex17 = {s = ["Esempio 17."]};
ex18 = {s = ["Esempio 18. A combination of ex1-ex16"]};
ex19 = {s = ["Esempio 19. A combination of ex1-ex17"]};

View File

@@ -0,0 +1,38 @@
include
examples.Abs.gf;
-- test.RusU.gf;
../test.RusU.gf;
lincat
Text = SS;
lin
onePhraseText t = t ;
combine txt1 txt2 = { s = txt1.s ++ "<p>" ++ txt2.s } ;
-- combine txt1 txt2 = { s = txt1.s ++ txt2.s } ;
russian = russkij;
-- parkedNear = mkAdj2 (adjEnd_uyj "запаркованн" ) "около" Gen ;
parkedNear = (uy_j_EndDecl "запаркованн" ) ** { s2 = "около";
c= Gen };
ex1 = {s = ["Example 1."]};
ex2 = {s = ["Example 2."]};
ex3 = {s = ["Example 3."]};
ex4 = {s = ["Example 4."]};
ex5 = {s = ["Example 5."]};
ex6 = {s = ["Example 6."]};
ex7 = {s = ["Example 7."]};
ex8 = {s = ["Example 8."]};
ex9 = {s = ["Example 9."]};
ex10 = {s = ["Example 10."]};
ex11 = {s = ["Example 11."]};
ex12 = {s = ["Example 12."]};
ex13 = {s = ["Example 13."]};
ex14 = {s = ["Example 14."]};
ex15 = {s = ["Example 15."]};
ex16 = {s = ["Example 16."]};
ex17 = {s = ["Example 17."]};
ex18 = {s = ["Example 18. A combination of ex1-ex16"]};
ex19 = {s = ["Example 19. A combination of ex1-ex17"]};

View File

@@ -0,0 +1,34 @@
include
examples.Abs.gf;
-- test.Swe.gf;
../test.Swe.gf;
lincat
Text = SS;
lin
onePhraseText t = t ;
combine txt1 txt2 = { s = txt1.s ++ "<p>" ++ txt2.s } ;
-- combine txt1 txt2 = { s = txt1.s ++ txt2.s } ;
russian = extAdjective (aFin "rysk");
parkedNear = extAdjective (aFin "parkerad") ** { s2 = "vid" };
ex1 = {s = ["Exempel 1."]};
ex2 = {s = ["Exempel 2."]};
ex3 = {s = ["Exempel 3."]};
ex4 = {s = ["Exempel 4."]};
ex5 = {s = ["Exempel 5."]};
ex6 = {s = ["Exempel 6."]};
ex7 = {s = ["Exempel 7."]};
ex8 = {s = ["Exempel 8."]};
ex9 = {s = ["Exempel 9."]};
ex10 = {s = ["Exempel 10."]};
ex11 = {s = ["Exempel 11."]};
ex12 = {s = ["Exempel 12."]};
ex13 = {s = ["Exempel 13."]};
ex14 = {s = ["Exempel 14."]};
ex15 = {s = ["Exempel 15."]};
ex16 = {s = ["Exempel 16."]};
ex17 = {s = ["Exempel 17."]};
ex18 = {s = ["Exempel 18. En combination av ex1-ex16"]};
ex19 = {s = ["Exempel 19. En combination av ex1-ex17"]};