summaryrefslogtreecommitdiff
path: root/old-examples/systemS/Formula.gf
diff options
context:
space:
mode:
Diffstat (limited to 'old-examples/systemS/Formula.gf')
-rw-r--r--old-examples/systemS/Formula.gf20
1 files changed, 20 insertions, 0 deletions
diff --git a/old-examples/systemS/Formula.gf b/old-examples/systemS/Formula.gf
new file mode 100644
index 000000000..62bc67eb7
--- /dev/null
+++ b/old-examples/systemS/Formula.gf
@@ -0,0 +1,20 @@
+-- 20 Dec 2005, 9.45
+
+abstract Formula = {
+
+ cat
+ Formula ;
+ Term ;
+
+ fun
+ And, Or, If : (_,_ : Formula) -> Formula ;
+ Not : Formula -> Formula ;
+ Abs : Formula ;
+
+---- All, Exist : (Term -> Formula) -> Formula ;
+
+ -- to test
+
+ A, B, C : Formula ;
+
+} \ No newline at end of file