25.06.2015 Views

clause

clause

clause

SHOW MORE
SHOW LESS

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

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!