mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-22 19:22:50 -06:00
mathtext examples from Bonn
This commit is contained in:
19
examples/mathtext/GeometryGer.gf
Normal file
19
examples/mathtext/GeometryGer.gf
Normal file
@@ -0,0 +1,19 @@
|
||||
--# -path=alltenses
|
||||
|
||||
concrete GeometryGer of Geometry = LogicGer **
|
||||
open SyntaxGer, ParadigmsGer, IrregGer in {
|
||||
lin
|
||||
Line = mkN "Gerade" ;
|
||||
Point = mkN "Punkt" ;
|
||||
Circle = mkN "Kreis" ;
|
||||
Intersect = pred (mkV2 (mkV "schneiden")) ;
|
||||
Parallel = pred (mkA2 (mkA "parallel") (mkPrep "zu" dative)) ;
|
||||
Vertical = pred (mkA "vertikal") ;
|
||||
Centre = app (mkN2 (mkN "Mittelpunkt") (mkPrep [] genitive)) ;
|
||||
|
||||
Horizontal = mkVP (mkA "horizontal") ;
|
||||
Diverge = mkVP (mkV "divergieren") ;
|
||||
|
||||
Contain = mkVPSlash (mkV2 (fixprefixV "ent" halten_V)) ;
|
||||
|
||||
}
|
||||
Reference in New Issue
Block a user