diff options
Diffstat (limited to 'omegalib/examples/old_test/m7.oc-rt')
-rw-r--r-- | omegalib/examples/old_test/m7.oc-rt | 35 |
1 files changed, 0 insertions, 35 deletions
diff --git a/omegalib/examples/old_test/m7.oc-rt b/omegalib/examples/old_test/m7.oc-rt deleted file mode 100644 index a98c8a7..0000000 --- a/omegalib/examples/old_test/m7.oc-rt +++ /dev/null @@ -1,35 +0,0 @@ ->>> T1:={[i,j]->[j,i,0]}; ->>> T2:={[i,j]->[j,i,1]}; ->>> R2:={[i,j]: 1 <= i,j <= 9}; ->>> R3:={[i,j]: 1 <= i,j <= 9 && exists (alpha: j = 2alpha)}; ->>> codegen T1:R2,T2:R3; -for(t1 = 1; t1 <= 9; t1++) { - if (intMod(-t1,2) == 0) { - for(t2 = 1; t2 <= 9; t2++) { - s1(t2,t1); - s2(t2,t1); - } - } - if (intMod(-t1-1,2) == 0) { - for(t2 = 1; t2 <= 9; t2++) { - s1(t2,t1); - } - } -} - ->>> codegen 2 T1:R2,T2:R3; -for(t1 = 1; t1 <= 9; t1++) { - if (intMod(-t1,2) == 0) { - for(t2 = 1; t2 <= 9; t2++) { - s1(t2,t1); - s2(t2,t1); - } - } - if (intMod(-t1-1,2) == 0) { - for(t2 = 1; t2 <= 9; t2++) { - s1(t2,t1); - } - } -} - - |