From c0de7a0627c9c20267a3312055ea7da683632d20 Mon Sep 17 00:00:00 2001
From: aarne <aarne@chalmers.se>
Date: Fri, 18 Dec 2009 11:08:39 +0000
Subject: mathtext examples from Bonn

---
 examples/mathtext/GeometryFre.gf | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)
 create mode 100644 examples/mathtext/GeometryFre.gf

(limited to 'examples/mathtext/GeometryFre.gf')

diff --git a/examples/mathtext/GeometryFre.gf b/examples/mathtext/GeometryFre.gf
new file mode 100644
index 000000000..97502a650
--- /dev/null
+++ b/examples/mathtext/GeometryFre.gf
@@ -0,0 +1,18 @@
+--# -path=alltenses
+
+concrete GeometryFre of Geometry = LogicFre ** 
+  open SyntaxFre, ParadigmsFre, IrregFre in {
+lin
+  Line = mkN "ligne" ;
+  Point = mkN "point" ; 
+  Circle = mkN "cercle" masculine ;
+  Intersect = pred (mkV2 "couper") ;
+  Parallel = pred (mkA2 (mkA "parallèle") dative) ;
+  Vertical = pred (mkA "vertical") ;
+  Centre = app (mkN2 (mkN "centre" masculine) genitive) ;
+
+  Horizontal = mkVP (mkA "horizontel") ;
+  Diverge = mkVP (mkV "diverger") ;
+
+  Contain = mkVPSlash contenir_V2 ;
+}
-- 
cgit v1.2.3