1 | HPJava |
2 | |
3 | Procs p = new Procs1(4) ; |
4 | Range x = new BlockRange(100,p.dim(0)); |
5 | float [[,*]] a = |
6 | new float [[x, 100]] on p ; |
7 | float [[]] b = new float [[x]] on p ; |
8 | HPF |
9 | |
10 | !HPF$ PROCESSOR P(4) |
11 | !HPF$ DISTRIBUTE T(BLOCK) ONTO P |
12 | REAL A(100,100) |
13 | !HPF$ ALIGN A(:,*) WITH T(:) |
14 | REAL B(100) |
15 | !HPF$ ALIGN B(:) WITH T(:) |