summaryrefslogtreecommitdiff
path: root/omega/examples/old_test/chosol.oc-rt
diff options
context:
space:
mode:
Diffstat (limited to 'omega/examples/old_test/chosol.oc-rt')
-rw-r--r--omega/examples/old_test/chosol.oc-rt32
1 files changed, 32 insertions, 0 deletions
diff --git a/omega/examples/old_test/chosol.oc-rt b/omega/examples/old_test/chosol.oc-rt
new file mode 100644
index 0000000..8fa3b38
--- /dev/null
+++ b/omega/examples/old_test/chosol.oc-rt
@@ -0,0 +1,32 @@
+>>> T10:={[i] -> [0,i,0,0]};
+>>> T20:={[i,j] -> [1,j,0,i]};
+>>> T30:={[i] -> [1,i-1,1,0]};
+>>>
+>>> Symbolic n;
+>>> IS10 := {[i]: 2 <= i <= n};
+>>> IS20 := {[i,j]: 2 <= i <= n && 1 <= j <= i-1};
+>>> IS30 := IS10;
+>>>
+>>> codegen T10:IS10,T20:IS20,T30:IS30;
+for(t2 = 2; t2 <= n; t2++) {
+ s1(t2);
+}
+for(t2 = 1; t2 <= n-1; t2++) {
+ for(t4 = t2+1; t4 <= n; t4++) {
+ s2(t4,t2);
+ }
+ s3(t2+1);
+}
+
+>>> codegen 2 T10:IS10,T20:IS20,T30:IS30;
+for(t2 = 2; t2 <= n; t2++) {
+ s1(t2);
+}
+for(t2 = 1; t2 <= n-1; t2++) {
+ for(t4 = t2+1; t4 <= n; t4++) {
+ s2(t4,t2);
+ }
+ s3(t2+1);
+}
+
+