| File |
Line number |
Procedure |
Code |
|
./pkg/exf/exf_interp_read.F |
88 |
EXF_INTERP_READ |
IF ( nThreads .GT. 1 ) THEN |
|
./pkg/mdsio/mdsio_writelocal.F |
155 |
MDS_WRITELOCAL |
nthLoop = nThreads |
|
./pkg/mdsio/mdsio_writelocal.F |
161 |
MDS_WRITELOCAL |
IF ( nThreads.GT.1 .AND. globFile ) THEN |
|
./pkg/mnc/mnc_readparms.F |
69 |
MNC_READPARMS |
IF ( nThreads.GT.1 ) THEN |
|
./eesupp/src/bar2.F |
140 |
BAR2 |
DO I = 2, nThreads |
|
./eesupp/src/bar2.F |
144 |
BAR2 |
IF ( nDone .LT. nThreads ) GOTO 12 |
|
./eesupp/src/barrier.F |
142 |
BARRIER |
IF ( myThid .LT. 1 .OR. myThid .GT. nThreads ) THEN |
|
./eesupp/src/barrier.F |
145 |
BARRIER |
& myThid, ' nThreads = ', nThreads |
|
./eesupp/src/barrier.F |
161 |
BARRIER |
DO I=1,nThreads |
|
./eesupp/src/barrier.F |
165 |
BARRIER |
IF ( nDone .LT. nThreads ) GOTO 10 |
|
./eesupp/src/barrier.F |
207 |
BARRIER |
DO I=1,nThreads |
|
./eesupp/src/barrier.F |
211 |
BARRIER |
IF ( nDone .LT. nThreads ) GOTO 20 |
|
./eesupp/src/barrier.F |
243 |
BARRIER |
DO I=1,nThreads |
|
./eesupp/src/barrier.F |
247 |
BARRIER |
IF ( nDone .LT. nThreads ) GOTO 30 |
|
./eesupp/src/barrier.F |
35 |
BARRIER_INIT |
DO I=1,nThreads |
|
./eesupp/src/check_threads.F |
134 |
CHECK_THREADS |
DO I = 1, nThreads |
|
./eesupp/src/check_threads.F |
143 |
CHECK_THREADS |
& ' thread(s), ',nThreads,' are needed for this config!' |
|
./eesupp/src/check_threads.F |
156 |
CHECK_THREADS |
IF ( numberThreadsRunning .NE. nThreads ) THEN |
|
./eesupp/src/check_threads.F |
76 |
CHECK_THREADS |
IF ( OMP_GET_NUM_THREADS() .NE. nThreads ) THEN |
|
./eesupp/src/check_threads.F |
81 |
CHECK_THREADS |
& ' from "eedata", nThreads=', nThreads |
|
./verification/adjustment.cs-32x32x1/code_min/main.F |
154 |
NO PROCEDURE |
CALL PTINIT(nThreads) |
|
./verification/adjustment.cs-32x32x1/code_min/main.F |
168 |
NO PROCEDURE |
DO I=1,nThreads |
|
./eesupp/src/comm_stats.F |
118 |
COMM_STATS |
DO I=1,nThreads |
|
./eesupp/src/eedie.F |
56 |
EEDIE |
DO I = 1, nThreads |
|
./eesupp/src/eedie.F |
59 |
EEDIE |
IF ( nThreadsDone .LT. nThreads ) THEN |
|
./eesupp/src/eedie.F |
64 |
EEDIE |
& 'S/R EEDIE:',nThreads,' are expected for this config !' |
|
./pkg/aim_v23/aim_write_phys.F |
70 |
AIM_WRITE_PHYS |
DO ith=1,nThreads |
|
./eesupp/src/global_max.F |
156 |
GLOBAL_MAX_R8 |
DO I=2,nThreads |
|
./eesupp/src/global_max.F |
73 |
GLOBAL_MAX_R4 |
DO I=2,nThreads |
|
./eesupp/src/global_sum.F |
160 |
GLOBAL_SUM_R8 |
DO I=1,nThreads |
|
./eesupp/src/global_sum.F |
246 |
GLOBAL_SUM_INT |
DO I=1,nThreads |
|
./eesupp/src/global_sum.F |
72 |
GLOBAL_SUM_R4 |
DO I=1,nThreads |
|
./eesupp/src/gsum.F |
127 |
GSUM_R8 |
DO I = 2, nThreads |
|
./eesupp/src/gsum.F |
130 |
GSUM_R8 |
IF ( nDone .LT. nThreads ) GOTO 12 |
|
./eesupp/src/gsum.F |
137 |
GSUM_R8 |
DO I = 2,nThreads |
|
./eesupp/src/ini_threading_environment.F |
115 |
INI_THREADING_ENVIRONMENT |
IF ( nThreads .NE. nTx*nTy ) THEN |
|
./eesupp/src/ini_threading_environment.F |
119 |
INI_THREADING_ENVIRONMENT |
& ' nTx * nTy = ',nTx*nTy,' nThreads = ',nThreads |
|
./eesupp/src/ini_threading_environment.F |
162 |
INI_THREADING_ENVIRONMENT |
DO thId=1,nThreads |
|
./eesupp/src/ini_threading_environment.F |
179 |
INI_THREADING_ENVIRONMENT |
DO I=1,nThreads |
|
./eesupp/src/ini_threading_environment.F |
295 |
INI_THREADING_ENVIRONMENT |
IF ( nThreads.GT.1 .AND. useCubedSphereExchange ) THEN |
|
./eesupp/src/ini_threading_environment.F |
303 |
INI_THREADING_ENVIRONMENT |
IF ( nThreads.GT.1 ) THEN |
|
./eesupp/src/ini_threading_environment.F |
90 |
INI_THREADING_ENVIRONMENT |
nThreads = nTx * nTy |
|
./eesupp/src/ini_threading_environment.F |
91 |
INI_THREADING_ENVIRONMENT |
IF ( nThreads .GT. MAX_NO_THREADS ) THEN |
|
./eesupp/src/main.F |
160 |
NO PROCEDURE |
CALL PTINIT(nThreads) |
|
./eesupp/src/main.F |
174 |
NO PROCEDURE |
DO I=1,nThreads |
|
./pkg/autodiff/global_max_ad.F |
178 |
GLOBAL_ADMAX_R8 |
DO I=2,nThreads |
|
./pkg/autodiff/global_max_ad.F |
87 |
GLOBAL_ADMAX_R4 |
DO I=2,nThreads |
|
./eesupp/src/print.F |
140 |
PRINT_MESSAGE |
IF ( nThreads.LE.1 ) THEN |
|
./eesupp/src/print.F |
211 |
PRINT_ERROR |
IF ( numberOfProcs .EQ. 0 .AND. nThreads .EQ. 1 ) THEN |
|
./eesupp/src/print.F |
256 |
PRINT_ERROR |
IF ( nThreads.LE.1 ) THEN |
|
./eesupp/src/print.F |
93 |
PRINT_MESSAGE |
IF ( numberOfProcs .EQ. 0 .AND. nThreads .EQ. 1 ) THEN |
|
./eesupp/inc/EEPARAMS.h |
237 |
NO PROCEDURE |
& myPx, myPy, myXGlobalLo, myYGlobalLo, nThreads, |
|
./eesupp/inc/EEPARAMS.h |
257 |
NO PROCEDURE |
INTEGER nThreads |