summaryrefslogtreecommitdiff
path: root/omegalib/examples/old_test/wrap0.oc-rt
diff options
context:
space:
mode:
Diffstat (limited to 'omegalib/examples/old_test/wrap0.oc-rt')
-rw-r--r--omegalib/examples/old_test/wrap0.oc-rt26
1 files changed, 26 insertions, 0 deletions
diff --git a/omegalib/examples/old_test/wrap0.oc-rt b/omegalib/examples/old_test/wrap0.oc-rt
new file mode 100644
index 0000000..d9c7d34
--- /dev/null
+++ b/omegalib/examples/old_test/wrap0.oc-rt
@@ -0,0 +1,26 @@
+# Omega Calculator v1.2 (based on Omega Library 1.2, August, 2000):
+# symbolic n;
+#
+# I := {[i,j,k] : 1 <= i,j,k <= n};
+#
+# R1 := {[i,j,n] -> [i,j+1,1] : 1 <= i,j,j+1 <= n}
+# union {[i,j,k] -> [i,j,k'] : 1 <= i,j,k,k' <= n && k' = k+1};
+#
+# R1;
+
+{[i,j,n] -> [i,j+1,1] : 1 <= i <= n && 1 <= j < n} union
+ {[i,j,k] -> [i,j,k+1] : 1 <= i <= n && 1 <= j <= n && 1 <= k < n}
+
+#
+# R1+ within I;
+
+{[i,j,k] -> [i,j',k'] : 1 <= j < j' <= n && 1 <= i <= n && 1 <= k <= n && 1 <= k' <= n} union
+ {[i,j,k] -> [i,j,k'] : 1 <= k < k' <= n && 1 <= i <= n && 1 <= j <= n}
+
+#
+# R1+;
+
+{[i,j,k] -> [i,j',k'] : 1 <= j < j' <= n && 1 <= i <= n && 1 <= k <= n && 1 <= k' <= n} union
+ {[i,j,k] -> [i,j,k'] : 1 <= k < k' <= n && 1 <= i <= n && 1 <= j <= n}
+
+#