diff options
| author | aarne <aarne@cs.chalmers.se> | 2008-08-15 12:41:04 +0000 |
|---|---|---|
| committer | aarne <aarne@cs.chalmers.se> | 2008-08-15 12:41:04 +0000 |
| commit | ba78322409e2086a83c03b7b32e84940a24030b0 (patch) | |
| tree | 87b13411a8d6db544461eef201f4e02207ac0ff1 /examples/morpho/EngDescr.gf | |
| parent | 0475ef3414cff410b826c9f06e6c7043625972fa (diff) | |
examples of morphological synthesis/analysis as top-level grammars
Diffstat (limited to 'examples/morpho/EngDescr.gf')
| -rw-r--r-- | examples/morpho/EngDescr.gf | 23 |
1 files changed, 23 insertions, 0 deletions
diff --git a/examples/morpho/EngDescr.gf b/examples/morpho/EngDescr.gf new file mode 100644 index 000000000..3e5efec77 --- /dev/null +++ b/examples/morpho/EngDescr.gf @@ -0,0 +1,23 @@ +--# -path=.:alltenses + +concrete EngDescr of Eng = IrregEng ** open (R = ResEng) in { + +lincat + Display, Word, Form = Str ; + +lin + DAll w = w ++ ":" ++ "all forms" ; + + DForm w f = w ++ ":" ++ f ; + +-- names of forms displayed + + VInf = "Infinitive" ; + VPres = "Present" ; + VPast = "Past" ; + VPPart = "Past Participle" ; + VPresPart = "Present Participle" ; + + WVerb v = v.s ! R.VInf ; -- the dictionary form shown in word description + +} |
