diff options
Diffstat (limited to 'omegalib/examples/old_test/p.delft')
-rw-r--r-- | omegalib/examples/old_test/p.delft | 22 |
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); |