summaryrefslogtreecommitdiff
path: root/old-examples/model/MathI.gf
diff options
context:
space:
mode:
Diffstat (limited to 'old-examples/model/MathI.gf')
-rw-r--r--old-examples/model/MathI.gf16
1 files changed, 16 insertions, 0 deletions
diff --git a/old-examples/model/MathI.gf b/old-examples/model/MathI.gf
new file mode 100644
index 000000000..1d049633c
--- /dev/null
+++ b/old-examples/model/MathI.gf
@@ -0,0 +1,16 @@
+incomplete concrete MathI of Math =
+ open Syntax, Lex in {
+
+ flags startcat = Prop ;
+
+ lincat
+ Prop = S ;
+ Elem = NP ;
+
+ lin
+ And x y = mkS and_Conj x y ;
+ Even x = mkS (mkCl x even_A) ;
+ Odd x = mkS (mkCl x odd_A) ;
+ Zero = mkNP zero_PN ;
+
+}