summaryrefslogtreecommitdiff
path: root/omegalib/examples/old_test/m7.oc-rt
diff options
context:
space:
mode:
Diffstat (limited to 'omegalib/examples/old_test/m7.oc-rt')
-rw-r--r--omegalib/examples/old_test/m7.oc-rt35
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);
- }
- }
-}
-
-