diff options
Diffstat (limited to 'omegalib/examples/old_test/m12.oc-rt')
-rw-r--r-- | omegalib/examples/old_test/m12.oc-rt | 54 |
1 files changed, 0 insertions, 54 deletions
diff --git a/omegalib/examples/old_test/m12.oc-rt b/omegalib/examples/old_test/m12.oc-rt deleted file mode 100644 index ab5953b..0000000 --- a/omegalib/examples/old_test/m12.oc-rt +++ /dev/null @@ -1,54 +0,0 @@ -# Omega Calculator v1.2 (based on Omega Library 1.2, August, 2000): -# symbolic n,m; -# -# I1 := {[1,1:n,1:m,0]}; -# -# I2 := {[2,1:n,0,0]}; -# -# I3 := {[3,1:m,1,1:n]}; -# -# I4 := {[3,1:m,2,1:n]}; -# -# I5 := {[4,1:m,0,0]}; -# -# codegen I1; -if (m >= 1) { - for(t2 = 1; t2 <= n; t2++) { - for(t3 = 1; t3 <= m; t3++) { - s1(1,t2,t3,0); - } - } -} - -# -# codegen I1,I1,I2,I2,I3,I3,I4,I4,I5,I5; -if (m >= 1) { - for(t2 = 1; t2 <= n; t2++) { - for(t3 = 1; t3 <= m; t3++) { - s1(1,t2,t3,0); - s2(1,t2,t3,0); - } - } -} -for(t2 = 1; t2 <= n; t2++) { - s3(2,t2,0,0); - s4(2,t2,0,0); -} -if (n >= 1) { - for(t2 = 1; t2 <= m; t2++) { - for(t4 = 1; t4 <= n; t4++) { - s5(3,t2,1,t4); - s6(3,t2,1,t4); - } - for(t4 = 1; t4 <= n; t4++) { - s7(3,t2,2,t4); - s8(3,t2,2,t4); - } - } -} -for(t2 = 1; t2 <= m; t2++) { - s9(4,t2,0,0); - s10(4,t2,0,0); -} - -# |