Typical situations
SUBROUTINE ...
...
DO J=1,M
DO I=1,N
A(I,J)=0.0
ENDDO
ENDDO
...
RETURN
END
Case 1: Only little code before and after J-loop
Insert directive: !pdir
!PDIR PARDO
DO J=1,M
DO I=1,N
A(I,J)=0.0
ENDDO
ENDDO
DANGER: Whole subroutine is executed in parallel
original
Vorherige Folie
Nächste Folie
Zurück zur ersten Folie
Graphik-Version anzeigen