diff options
Diffstat (limited to 'examples/godis-tram/Tram/TramLexiconEng.gf')
| -rw-r--r-- | examples/godis-tram/Tram/TramLexiconEng.gf | 34 |
1 files changed, 34 insertions, 0 deletions
diff --git a/examples/godis-tram/Tram/TramLexiconEng.gf b/examples/godis-tram/Tram/TramLexiconEng.gf new file mode 100644 index 000000000..955baac30 --- /dev/null +++ b/examples/godis-tram/Tram/TramLexiconEng.gf @@ -0,0 +1,34 @@ +--# -path=.:../Common:prelude:resource-1.0/abstract:resource-1.0/common:resource-1.0/english + +concrete TramLexiconEng of TramLexicon = CatEng ** + open Prelude, ParadigmsEng, ParamX, (Lex=LexiconEng), (Irr=IrregEng), GodisLangEng in { + +lin + +-- Adjectives +short_A = Lex.short_A; + +-- Conjunctions +and_then_Conj = {s = ["and then"]; n = Pl; lock_Conj = <>}; + +-- Nouns +route_N = regN "route"; +stop_N = regN "stop"; +way_N = regN "way"; + +-- Prepositions +from_Prep = ss "from"; +to_Prep = ss "to"; + +-- Verb-1 +help_V = regV "help"; +restart_V = regV "restart"; + +-- Verb-2 +go_from_V2 = dirV2 (partV (regV "go") "from"); --- ?? +go_to_V2 = dirV2 (partV (regV "go") "to"); --- ?? +find_V2 = Lex.find_V2; +findout_V2 = dirV2 (regV "findout"); --- ?? +take_V2 = dirV2 Irr.take_V; + +} |
