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/chosol.oc-rt | 32 ++++++++++++++++++++++++++++++++ 1 file changed, 32 insertions(+) create mode 100644 omegalib/examples/old_test/chosol.oc-rt (limited to 'omegalib/examples/old_test/chosol.oc-rt') diff --git a/omegalib/examples/old_test/chosol.oc-rt b/omegalib/examples/old_test/chosol.oc-rt new file mode 100644 index 0000000..8fa3b38 --- /dev/null +++ b/omegalib/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); +} + + -- cgit v1.2.3-70-g09d2