From 75ff98e4d65862ff5b36b533b4f6e3ea71ede1d5 Mon Sep 17 00:00:00 2001 From: Tuowen Zhao Date: Sat, 17 Sep 2016 03:22:53 +0000 Subject: cmake build --- omegalib/examples/old_test/m10.oc-rt | 47 ++++++++++++++++++++++++++++++++++++ 1 file changed, 47 insertions(+) create mode 100644 omegalib/examples/old_test/m10.oc-rt (limited to 'omegalib/examples/old_test/m10.oc-rt') diff --git a/omegalib/examples/old_test/m10.oc-rt b/omegalib/examples/old_test/m10.oc-rt new file mode 100644 index 0000000..c782e1d --- /dev/null +++ b/omegalib/examples/old_test/m10.oc-rt @@ -0,0 +1,47 @@ +>>> IS:={[i,j]: 1 <= i,j <= 9}; +>>> T1:={[i,j]->[4j,i,0]}; +>>> T2:={[i,j]->[2j,i,1]}; +>>> codegen T1:IS,T2:IS; +for(t1 = 2; t1 <= 36; t1 += 2) { + if (intMod(t1,4) == 0 && t1 <= 16) { + for(t2 = 1; t2 <= 9; t2++) { + s1(t2,intDiv(t1,4)); + s2(t2,intDiv(t1,2)); + } + } + if (intMod(t1,4) == 0 && t1 >= 20) { + for(t2 = 1; t2 <= 9; t2++) { + s1(t2,intDiv(t1,4)); + } + } + if (intMod(t1-2,4) == 0 && t1 <= 18) { + for(t2 = 1; t2 <= 9; t2++) { + s2(t2,intDiv(t1,2)); + } + } +} + +>>> codegen 2 T1:IS,T2:IS; +for(t1 = 2; t1 <= 16; t1 += 2) { + if (intMod(t1,4) == 0) { + for(t2 = 1; t2 <= 9; t2++) { + s1(t2,intDiv(t1,4)); + s2(t2,intDiv(t1,2)); + } + } + if (intMod(t1-2,4) == 0) { + for(t2 = 1; t2 <= 9; t2++) { + s2(t2,intDiv(t1,2)); + } + } +} +for(t2 = 1; t2 <= 9; t2++) { + s2(t2,9); +} +for(t1 = 20; t1 <= 36; t1 += 4) { + for(t2 = 1; t2 <= 9; t2++) { + s1(t2,intDiv(t1,4)); + } +} + + -- cgit v1.2.3-70-g09d2