summaryrefslogtreecommitdiff
path: root/omegalib/examples/old_test/forall.oc-rt
diff options
context:
space:
mode:
Diffstat (limited to 'omegalib/examples/old_test/forall.oc-rt')
-rw-r--r--omegalib/examples/old_test/forall.oc-rt28
1 files changed, 28 insertions, 0 deletions
diff --git a/omegalib/examples/old_test/forall.oc-rt b/omegalib/examples/old_test/forall.oc-rt
new file mode 100644
index 0000000..13f78fa
--- /dev/null
+++ b/omegalib/examples/old_test/forall.oc-rt
@@ -0,0 +1,28 @@
+# Omega Calculator v1.2 (based on Omega Library 1.2, August, 2000):
+# symbolic n,m,B;
+#
+# { [max_diff] :
+# forall (m :
+# (not exists (z1,z2 : 0<=z1<n && z1<=z2<m+z1 && z2 = m))
+# or
+# (forall (minX,minY :
+# (not (forall (x1,x2 : (not (0<=x1<n && x1<=x2<m+x1 && m-B+1 <= x2 <= m)) or (x1+x2 >= minX)) &&
+# exists (x1,x2 : 0<=x1<n && x1<=x2<m+x1 && m-B+1 <= x2 <= m && x1+x2 = minX) &&
+# forall (y1,y2 : (not (0<=y1<n && y1<=y2<=m+y1 && m+1 <= y2 <= m+B)) or (y1+y2 >= minY)) &&
+# exists (y1,y2 : 0<=y1<n && y1<=y2<=m+y1 && m+1 <= y2 <= m+B && y1+y2 = minY)))
+# or
+# (minY-minX <= max_diff)))) &&
+# exists (m,z1,z2,minX,minY :
+# 0<=z1<n && z1<=z2<=m+z1 && z2 = m &&
+# forall (x1,x2 : (not (0<=x1<n && x1<=x2<m+x1 && m-B+1 <= x2 <= m)) or (x1+x2 >= minX)) &&
+# exists (x1,x2 : 0<=x1<n && x1<=x2<m+x1 && m-B+1 <= x2 <= m && x1+x2 = minX) &&
+# forall (y1,y2 : (not (0<=y1<n && y1<=y2<=m+y1 && m+1 <= y2 <= m+B)) or (y1+y2 >= minY)) &&
+# exists (y1,y2 : 0<=y1<n && y1<=y2<=m+y1 && m+1 <= y2 <= m+B && y1+y2 = minY) &&
+# minY-minX = max_diff)};
+
+{[B+1]: 2 <= B && 2 <= n} union
+ {[1]: B = 1 && 2 <= n}
+
+#
+#
+#