summaryrefslogtreecommitdiff
path: root/omegalib/examples/old_test/subsets1.oc-rt
diff options
context:
space:
mode:
Diffstat (limited to 'omegalib/examples/old_test/subsets1.oc-rt')
-rw-r--r--omegalib/examples/old_test/subsets1.oc-rt70
1 files changed, 70 insertions, 0 deletions
diff --git a/omegalib/examples/old_test/subsets1.oc-rt b/omegalib/examples/old_test/subsets1.oc-rt
new file mode 100644
index 0000000..345639f
--- /dev/null
+++ b/omegalib/examples/old_test/subsets1.oc-rt
@@ -0,0 +1,70 @@
+# Omega Calculator v1.2 (based on Omega Library 1.2, August, 2000):
+# R := {[x]:x > 1 };
+#
+# R;
+
+{[x]: 2 <= x}
+
+#
+# R2 := subsetof R;
+#
+# R2;
+
+{[x]: 2 <= x && UNKNOWN}
+
+#
+#
+# R - R2;
+
+{[x]: 2 <= x && UNKNOWN}
+
+#
+# R subset R2;
+
+False
+#
+# R2 - R;
+
+{[x] : FALSE }
+
+#
+# R2 subset R;
+
+True
+#
+#
+# S := {[x]: x > 0};
+#
+# S - R;
+
+{[1]}
+
+#
+# R subset S;
+
+True
+#
+# S - R2;
+
+{[x]: 2 <= x && UNKNOWN} union
+ {[1]}
+
+#
+# R2 subset S;
+
+True
+#
+#
+# S2 := {[x]: x > -1};
+#
+# S3 := subsetof S2;
+#
+# S3 - S;
+
+{[0]: UNKNOWN}
+
+#
+# S subset S3;
+
+False
+#