msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

mathtext examples from Bonn

Browse Source
This commit is contained in:
aarne
2009-12-18 11:08:39 +00:00
parent 8d5f97866d
commit c0ffa614ae
24 changed files with 413 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
examples/mathtext/GeometryEng.gf Normal file
View File

@@ -0,0 +1,18 @@
--# -path=alltenses
concrete GeometryEng of Geometry = LogicEng **
open SyntaxEng, ParadigmsEng in {
lin
Line = mkN "line" ;
Point = mkN "point" ;
Circle = mkN "circle" ;
Intersect = pred (mkV2 "intersect") ;
Parallel = pred (mkA2 (mkA "parallel") (mkPrep "to")) ;
Vertical = pred (mkA "vertical") ;
Centre = app (mkN2 (mkN "centre") (mkPrep "of")) ;
Horizontal = mkVP (mkA "horizontal") ;
Diverge = mkVP (mkV "diverge") ;
Contain = mkVPSlash (mkV2 "contain") ;
}