clause
clause
clause
Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
举 例 说 明 变 量 类 型<br />
program sort<br />
common /input/ A(10)<br />
integer index(10)<br />
call input<br />
C$OMP PARALLEL<br />
call work(index)<br />
C$OMP END PARALLEL<br />
print*, index(1)<br />
subroutine work<br />
common /input/ A(10)<br />
real temp(10)<br />
integer count<br />
save count<br />
…………<br />
变 量 A,index 和 cound 为 所 有 线<br />
程 共 享 .<br />
temp 为 线 程 私 有 变 量 , 各 线 程 间<br />
到 不 可 见 .<br />
2006 年 4 月 共 享 存 储 编 程 63/108