summaryrefslogtreecommitdiff
path: root/omega/examples/old_test/wrap.oc-rt
diff options
context:
space:
mode:
authordhuth <derickhuth@gmail.com>2014-10-06 11:56:47 -0600
committerdhuth <derickhuth@gmail.com>2014-10-06 11:56:47 -0600
commite4b20015a4ee35f1279af4caa983478fa2ff0d4a (patch)
treef47cbff8b2bba458b54a739e91a87b303f7665f1 /omega/examples/old_test/wrap.oc-rt
parent600fa18324c21a162c50c40ae5f00c899a41dd24 (diff)
downloadchill-e4b20015a4ee35f1279af4caa983478fa2ff0d4a.tar.gz
chill-e4b20015a4ee35f1279af4caa983478fa2ff0d4a.tar.bz2
chill-e4b20015a4ee35f1279af4caa983478fa2ff0d4a.zip
Added omega to source
Diffstat (limited to 'omega/examples/old_test/wrap.oc-rt')
-rw-r--r--omega/examples/old_test/wrap.oc-rt50
1 files changed, 50 insertions, 0 deletions
diff --git a/omega/examples/old_test/wrap.oc-rt b/omega/examples/old_test/wrap.oc-rt
new file mode 100644
index 0000000..0729e41
--- /dev/null
+++ b/omega/examples/old_test/wrap.oc-rt
@@ -0,0 +1,50 @@
+# 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+;
+
+{[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+ 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}
+
+#
+# R2 := {[i,n,n] -> [i+1,1,1] : 1 <= i,i+1 <= n}
+# union R1;
+#
+# R2;
+
+{[i,n,n] -> [i+1,1,1] : 1 <= i < n} union
+ {[i,j,k] -> [i,j,k+1] : 1 <= i <= n && 1 <= j <= n && 1 <= k < n} union
+ {[i,j,n] -> [i,j+1,1] : 1 <= i <= n && 1 <= j < n}
+
+#
+# R2+;
+
+{[i,j,k] -> [i',j',k'] : 1 <= i < i' <= n && 1 <= j <= n && 1 <= k <= n && 1 <= j' <= n && 1 <= k' <= n} union
+ {[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}
+
+#
+# R2+ within I;
+
+{[i,j,k] -> [i',j',k'] : 1 <= i < i' <= n && 1 <= j <= n && 1 <= k <= n && 1 <= j' <= n && 1 <= k' <= n} union
+ {[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}
+
+#