Example -- Variable Typing

!$omp parallel do

do i=1,nelg

. . .

call hrgmd

. . .

enddo

subroutine hrgmd

common/aux32/

. . .

call hgx

. . .

end

• Coarse grain parallel loop

• Calls working subroutine

• It calls another

• Data is passed through common

Previous slide

Next slide

Back to first slide

View graphic version