clause
clause
clause
You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
DEFAULT 例 (Fortran)<br />
itotal = 1000<br />
C$OMP PARALLEL PRIVATE(np, each)<br />
np = omp_get_num_threads()<br />
each = itotal/np<br />
………<br />
C$OMP END PARALLEL<br />
itotal = 1000<br />
C$OMP PARALLEL DEFAULT(PRIVATE) SHARED(itotal)<br />
np = omp_get_num_threads()<br />
each = itotal/np<br />
………<br />
C$OMP END PARALLEL<br />
2006 年 4 月 共 享 存 储 编 程 73/108