140.新的并行执行特性 |
![]() ![]() |
!HPF$ INDEPENDENT
DO i = 1, n
牋牋 !HPF$ ON HOME( ix(i) )
牋牋 x(i) = y(ix(i)) - y(iy(i))
END DO
!HPF$ INDEPENDENT, NEW(xinc), REDUCTION(x)
DO i = 1, n
牋牋 CALL sub(i, xinc)
牋牋 x = x + xinc
END DO
!HPF$ TASKING
牋牋 !HPF$ ON HOME(p(1:8))
牋牋 CALL foo(x,y)
牋牋 !HPF$ ON HOME(p(9:16))
牋牋 CALL bar(x)
!HPF$ END
Copyright: NPACT | ![]() ![]() |