summaryrefslogtreecommitdiff
path: root/omegalib/examples/old_test/p.delft
diff options
context:
space:
mode:
Diffstat (limited to 'omegalib/examples/old_test/p.delft')
-rw-r--r--omegalib/examples/old_test/p.delft22
1 files changed, 0 insertions, 22 deletions
diff --git a/omegalib/examples/old_test/p.delft b/omegalib/examples/old_test/p.delft
deleted file mode 100644
index 27840a2..0000000
--- a/omegalib/examples/old_test/p.delft
+++ /dev/null
@@ -1,22 +0,0 @@
-# Generate local code for this HPF code fragment
-# !HPF$ template T(0:150,0:150)
-# !HPF$ align X(I,J) with T(3*I,3*J)
-A := { [i,j] -> [3i,3j] };
-# !HPF$ processors P(0:3, 0:3)
-# !HPF$ distribute
-# !HPF$ T(cyclic(4), cyclic(4)) onto P
-D := { [t1,t2] -> [p1,p2,c1,c2,l1,l2] :
- t1 = 16c1+4p1+l1
- && t2 = 16c2+4p2+l2
- && 0 <= p1,p2 <= 3
- && 0 <= l1,l2 <= 3 };
-# do I = 0, 14
-# Y(I,I) = 1.0
-# enddo
-I := { [i] : 0 <= i <= 14 };
-X := { [i] -> [i,i] };
-R := D(A(X(I)));
-R;
-symbolic P1,P2;
-selectLocal := {[P1,P2,c1,c2,l1,l2] -> [c1,c2,l1,l2]};
-codegen selectLocal(R);