diff options
| author | aarne <aarne@cs.chalmers.se> | 2006-06-01 16:16:18 +0000 |
|---|---|---|
| committer | aarne <aarne@cs.chalmers.se> | 2006-06-01 16:16:18 +0000 |
| commit | 013f3ce803cac0d6b0d6f100f4561fb8a0e892fe (patch) | |
| tree | 1a0e76c97ec0a73ec35b2ce29b86481994609049 /doc/tutorial/arithm/ArithmEng.gf | |
| parent | 89bd3aff33b7775dd0b1b6290828806c3e5f1c90 (diff) | |
resource examples in tutorial
Diffstat (limited to 'doc/tutorial/arithm/ArithmEng.gf')
| -rw-r--r-- | doc/tutorial/arithm/ArithmEng.gf | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/doc/tutorial/arithm/ArithmEng.gf b/doc/tutorial/arithm/ArithmEng.gf new file mode 100644 index 000000000..5d2cd966d --- /dev/null +++ b/doc/tutorial/arithm/ArithmEng.gf @@ -0,0 +1,27 @@ +--# -path=.:alltenses:prelude + +concrete ArithmEng of Arithm = ArithmI with + (Lang = LangEng), + (Lex = LexEng) ; + +{- + +concrete ArithmEng of Arithm = open LangEng, ParadigmsEng in { + + lincat + Prop = S ; + Nat = NP ; + + lin + Zero = + UsePN (regPN "zero" nonhuman) ; + Succ n = + DetCN (DetSg (SgQuant DefArt) NoOrd) (ComplN2 (regN2 "successor") n) ; + Even n = + UseCl TPres ASimul PPos + (PredVP n (UseComp (CompAP (PositA (regA "even"))))) ; + And x y = + ConjS and_Conj (BaseS x y) ; + +} +-} |
