summaryrefslogtreecommitdiff
path: root/omegalib/examples/old_test/wak4.oc-rt
blob: 5f2cacdc18242663d01c744027eb5c170c7fd448 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
>>> Symbolic a1,a2,a3,a4,a5,b1,b2,b3,b4,b5;
>>> IS1 := {[i] : a1,a2,a3,a4,a5 <= i <= b1,b2,b3,b4,b5 };
>>> IS2 := {[i] : a1,a2,a3,a4,a5 <= i <= b1,b2,b3,b4,b5 };
>>> 
>>> T1 := {[i] -> [i,0]};
>>> T2 := {[i] -> [i,1]};
>>> 
>>> codegen T1:IS1,T2:IS2;
for(t1 = max(a1,a2,a3,a4,a5); t1 <= min(b1,b2,b3,b4,b5); t1++) {
  s1(t1);
  s2(t1);
}

>>> codegen 2 T1:IS1,T2:IS2;
for(t1 = max(a1,a2,a3,a4,a5); t1 <= min(b1,b2,b3,b4,b5); t1++) {
  s1(t1);
  s2(t1);
}