Loop Reductions
-
!HPF$ INDEPENDENT, NEW(xinc), REDUCTION(x)
-
DO i = 1, n
-
CALL sub(i, xinc)
-
x = x + xinc
-
END DO
|
Computation Placement
-
!HPF$ INDEPENDENT
-
DO i = 1, n
-
!HPF$ ON HOME( ix(i) )
-
x(i) = y(ix(i)) - y(iy(i))
-
END DO
|
Task Parallelism
-
!HPF$ TASK_REGION
-
!HPF$ ON HOME(p(1:8))
-
CALL foo(x,y)
-
!HPF$ ON HOME(p(9:16))
-
CALL bar(z)
-
!HPF$ END TASK_REGION
|