Reducing Parallel Overhead
Don't parallelize ALL the loops.
Don't parallelize the small loops.
Use the if'' modifier.
c$doacross if(n > 500), local(...), share(...)
do i=1,n
enddo
Previous slide
Next slide
Back to first slide
View graphic version