diff options
| author | aarne <aarne@chalmers.se> | 2009-12-18 11:08:39 +0000 |
|---|---|---|
| committer | aarne <aarne@chalmers.se> | 2009-12-18 11:08:39 +0000 |
| commit | c0de7a0627c9c20267a3312055ea7da683632d20 (patch) | |
| tree | da4ce4cf7f1f1fd8c83254a82a20778bdeef360a /examples/mathtext/LexLogicEng.gf | |
| parent | a4eb1800a4913121297eb83970718cd3895aa43f (diff) | |
mathtext examples from Bonn
Diffstat (limited to 'examples/mathtext/LexLogicEng.gf')
| -rw-r--r-- | examples/mathtext/LexLogicEng.gf | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/examples/mathtext/LexLogicEng.gf b/examples/mathtext/LexLogicEng.gf new file mode 100644 index 000000000..efb8c4a8d --- /dev/null +++ b/examples/mathtext/LexLogicEng.gf @@ -0,0 +1,15 @@ +instance LexLogicEng of LexLogic = open SyntaxEng, ParadigmsEng, + (MS = MakeStructuralEng), Prelude in { + +oper + case_N = mkN "case" ; + such_A = mkA "such" ; + by_Prep = mkPrep "by" ; + all_Det = aPl_Det ; + axiom_N = mkN "axiom" ; + theorem_N = mkN "theorem" ; + definition_N = mkN "definition" ; + define_V3 = mkV3 (mkV "define") (mkPrep [] ) (mkPrep "as") ; + define_V2V = mkV2V (mkV "define") (mkPrep [] ) (mkPrep []) ; + iff_Subj = MS.mkSubj "if and only if" ; +} |
