diff options
| author | aarne <aarne@chalmers.se> | 2013-10-27 15:17:10 +0000 |
|---|---|---|
| committer | aarne <aarne@chalmers.se> | 2013-10-27 15:17:10 +0000 |
| commit | ccc18da2d406a7116e63c34798b22d036d203bc7 (patch) | |
| tree | dc6ede5d155a35642613bc9255825e719a43f813 | |
| parent | 9410c6b1411612658d5262cbfca903fd1927cd55 (diff) | |
added TranslateSwe to the Parse+Phrasebook translators
| -rw-r--r-- | examples/translator/Makefile | 3 | ||||
| -rw-r--r-- | examples/translator/TranslateEng.gf | 2 | ||||
| -rw-r--r-- | examples/translator/TranslateSwe.gf | 16 |
3 files changed, 20 insertions, 1 deletions
diff --git a/examples/translator/Makefile b/examples/translator/Makefile index a3999924e..b9e8886d0 100644 --- a/examples/translator/Makefile +++ b/examples/translator/Makefile @@ -17,6 +17,9 @@ TranslateFin: TranslateFre: gf -make -literal=Symb -probs=$(PROBSFILE) -name=TranslateFre TranslateFre.gf +TranslateSwe: + gf -make -literal=Symb -probs=$(PROBSFILE) -name=TranslateSwe TranslateSwe.gf + TranslateEngBul: gf -make -literal=Symb -probs=$(PROBSFILE) -name=TranslateEngBul TranslateEng.pgf TranslateBul.pgf diff --git a/examples/translator/TranslateEng.gf b/examples/translator/TranslateEng.gf index bfe16b263..22f09deef 100644 --- a/examples/translator/TranslateEng.gf +++ b/examples/translator/TranslateEng.gf @@ -1,4 +1,4 @@ ---# -path=.:alltenses:../phrasebook:../../lib/src/english +--# -path=.:../phrasebook:../../lib/src/english:../../lib/src/abstract concrete TranslateEng of Translate = ParseEng, PhrasebookEng ** open SyntaxEng, (E = ExtraEng), Prelude in { diff --git a/examples/translator/TranslateSwe.gf b/examples/translator/TranslateSwe.gf new file mode 100644 index 000000000..957be0c50 --- /dev/null +++ b/examples/translator/TranslateSwe.gf @@ -0,0 +1,16 @@ +--# -path=.:alltenses:../phrasebook:../../lib/src/english:../../lib/src/swedish:../../lib/src/scandinavian + +concrete TranslateSwe of Translate = + ParseSwe - [open_A], + PhrasebookSwe ** + open SyntaxSwe, ParadigmsSwe, (E = ExtraSwe), Prelude in { + +lin + PPhr p = lin Text p ; + NP_Person np = {name = lin NP np ; isPron = False ; poss = mkQuant he_Pron} ; + NP_Object np = lin NP np ; + NP_Item np = lin NP np ; + NP_Place np0 = let np = lin NP np0 in + {name = np ; at = SyntaxSwe.mkAdv in_Prep np ; to = SyntaxSwe.mkAdv to_Prep np} ; + +}
\ No newline at end of file |