From e4b20015a4ee35f1279af4caa983478fa2ff0d4a Mon Sep 17 00:00:00 2001
From: dhuth <derickhuth@gmail.com>
Date: Mon, 6 Oct 2014 11:56:47 -0600
Subject: Added omega to source
---
omega/examples/old_test/lefur00.oc-rt | 28 ++++++++++++++++++++++++++++
1 file changed, 28 insertions(+)
create mode 100644 omega/examples/old_test/lefur00.oc-rt
(limited to 'omega/examples/old_test/lefur00.oc-rt')
diff --git a/omega/examples/old_test/lefur00.oc-rt b/omega/examples/old_test/lefur00.oc-rt
new file mode 100644
index 0000000..3b3736f
--- /dev/null
+++ b/omega/examples/old_test/lefur00.oc-rt
@@ -0,0 +1,28 @@
+# Omega Calculator v1.2 (based on Omega Library 1.2, August, 2000):
+# R := { [i, j, k, l] :
+# 0 <= i <= 19 &&
+# 0 <= j <= 19 &&
+# 1 <= k <= 1000 &&
+# -k + l >= 0 &&
+# 2 k - l + 1 >= 0 &&
+# -200 i + k + l >= 0 &&
+# 200 i - k - l + 199 >= 0 &&
+# -200 j - k + 2 l >= 0 &&
+# 200 j + k -2 l + 199 >= 0
+# } ;
+#
+#
+#
+# codegen R;
+for(t1 = 0; t1 <= 15; t1++) {
+ for(t2 = max(2*t1-15,intDiv(t1-1+1,2)); t2 <= min(t1+1,15); t2++) {
+ for(t3 = max(intDiv(200*t1-1+2,3),intDiv(200*t2-2+2,3),intDiv(-200*t2+400*t1-199+2,3),1); t3 <= min(100*t1+99,intDiv(-200*t2+400*t1+398,3),1000); t3++) {
+ for(t4 = max(t3,200*t1-t3,intDiv(200*t2+t3+1,2)); t4 <= min(2*t3+1,intDiv(200*t2+t3+199,2),200*t1-t3+199); t4++) {
+ s1(t1,t2,t3,t4);
+ }
+ }
+ }
+}
+
+#
+#
--
cgit v1.2.3-70-g09d2