From c0de7a0627c9c20267a3312055ea7da683632d20 Mon Sep 17 00:00:00 2001 From: aarne Date: Fri, 18 Dec 2009 11:08:39 +0000 Subject: mathtext examples from Bonn --- examples/mathtext/LexLogicFre.gf | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) create mode 100644 examples/mathtext/LexLogicFre.gf (limited to 'examples/mathtext/LexLogicFre.gf') diff --git a/examples/mathtext/LexLogicFre.gf b/examples/mathtext/LexLogicFre.gf new file mode 100644 index 000000000..94036039c --- /dev/null +++ b/examples/mathtext/LexLogicFre.gf @@ -0,0 +1,16 @@ +instance LexLogicFre of LexLogic = open SyntaxFre, ParadigmsFre, + (MS = MakeStructuralFre), Prelude in { + +oper + case_N = mkN "cas" ; + such_A = mkA "tel" "telle" ; + by_Prep = mkPrep "par" ; + all_Det = thePl_Det ; + axiom_N = mkN "axiome" masculine ; + theorem_N = mkN "théorème" masculine ; + definition_N = mkN "définition" feminine ; + define_V3 = mkV3 (mkV "définir") (mkPrep []) (mkPrep "comme") ; + define_V2V = mkV2V (mkV "définir") (mkPrep []) genitive ; + iff_Subj = MS.mkSubj ("si et seulement" ++ if_Subj.s) ; --- .s + +} -- cgit v1.2.3