diff options
| author | aarne <aarne@cs.chalmers.se> | 2008-09-15 15:28:47 +0000 |
|---|---|---|
| committer | aarne <aarne@cs.chalmers.se> | 2008-09-15 15:28:47 +0000 |
| commit | e112fd188f905d90b727101fdbfa21478f4c9d18 (patch) | |
| tree | d149a7c013a3720d49cfaa028cc317b8f0ce186f /examples/jem-math/LexMathSpa.gf | |
| parent | 117b38e47ff2c98402b975ada3240b5d4e996d86 (diff) | |
JEM tutorial examples - some files missing still
Diffstat (limited to 'examples/jem-math/LexMathSpa.gf')
| -rw-r--r-- | examples/jem-math/LexMathSpa.gf | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/examples/jem-math/LexMathSpa.gf b/examples/jem-math/LexMathSpa.gf new file mode 100644 index 000000000..a52ae1599 --- /dev/null +++ b/examples/jem-math/LexMathSpa.gf @@ -0,0 +1,18 @@ +instance LexMathSpa of LexMath = + open SyntaxSpa, ParadigmsSpa, (L = LexiconSpa) in { + +oper + zero_PN = mkPN "cero" ; + successor_N2 = mkN2 (mkN "sucesor") genitive ; + sum_N2 = mkN2 (mkN "suma") genitive ; + product_N2 = mkN2 (mkN "producto") genitive ; + even_A = mkA "par" ; + odd_A = mkA "impar" ; + prime_A = mkA "primo" ; + equal_A2 = mkA2 (mkA "igual") dative ; + small_A = L.small_A ; + great_A = L.big_A ; + divisible_A2 = mkA2 (mkA "divisible") (mkPrep "por") ; + number_N = mkN "entero" ; + +} |