SHARED 節

SHARED 節は、PARALLELPARALLEL DO、および PARALLEL SECTIONS 宣言子上で使用し、チーム内のすべてのスレッド間で共有できるようにします。

次の例では、変数 X および NPOINTS が、チーム内のすべてのスレッドで共有されます。

!$OMP PARALLEL DEFAULT(PRIVATE),SHARED(X,NPOINTS)

  IAM = OMP_GET_THREAD_NUM()

  NP = OMP_GET_NUM_THREADS()

  IPOINTS = NPOINTS/NP

  CALL SUBDOMAIN(X,IAM,IPOINTS)

!$OMP END PARALLEL