summaryrefslogtreecommitdiff
path: root/book/examples/chapter8/GeometryEngb.gf
diff options
context:
space:
mode:
Diffstat (limited to 'book/examples/chapter8/GeometryEngb.gf')
-rw-r--r--book/examples/chapter8/GeometryEngb.gf11
1 files changed, 0 insertions, 11 deletions
diff --git a/book/examples/chapter8/GeometryEngb.gf b/book/examples/chapter8/GeometryEngb.gf
deleted file mode 100644
index 265f3f71a..000000000
--- a/book/examples/chapter8/GeometryEngb.gf
+++ /dev/null
@@ -1,11 +0,0 @@
-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")) ;
-}