Symbol Description Uses
nThreads 59


File Line number Procedure Code
./eesupp/src/barrier.F 117 BARRIER 
      IF ( myThid .LT. 1 .OR. myThid .GT. nThreads ) THEN
./eesupp/src/barrier.F 120 BARRIER 
     &  myThid, ' nThreads = ', nThreads
./eesupp/src/barrier.F 136 BARRIER 
        DO I=1,nThreads
./eesupp/src/barrier.F 140 BARRIER 
       IF ( nDone .LT. nThreads ) GOTO 10
./eesupp/src/barrier.F 182 BARRIER 
        DO I=1,nThreads
./eesupp/src/barrier.F 186 BARRIER 
       IF ( nDone .LT. nThreads ) GOTO 20
./eesupp/src/barrier.F 218 BARRIER 
        DO I=1,nThreads
./eesupp/src/barrier.F 222 BARRIER 
       IF ( nDone .LT. nThreads ) GOTO 30
./eesupp/src/barrier.F 35 BARRIER_INIT 
      DO I=1,nThreads
./pkg/mdsio/mdsio_writefield_loc.F 512 MDSWRITEFIELD_LOC 
       if (nThreads.NE.1) then
./pkg/mdsio/mdsio_writefield_loc.F 523 MDSWRITEFIELD_LOC 
     &    ' MDSWRITEFIELD: nThreads = ',nThreads
./pkg/mdsio/mdsio_writetile.F 244 MDS_WRITETILE 
       if (nThreads.NE.1) then
./pkg/mdsio/mdsio_writetile.F 255 MDS_WRITETILE 
     &    ' MDS_WRITETILE: nThreads = ',nThreads
./pkg/mdsio/mdsio_writelocal.F 271 MDS_WRITELOCAL 
       if (nThreads.NE.1) then
./pkg/mdsio/mdsio_writelocal.F 282 MDS_WRITELOCAL 
     &    ' MDS_WRITELOCAL: nThreads = ',nThreads
./pkg/mdsio/mdswritefield_new.F 513 MDSWRITEFIELD_NEW 
       if (nThreads.NE.1) then
./pkg/mdsio/mdswritefield_new.F 524 MDSWRITEFIELD_NEW 
     &    ' MDSWRITEFIELD: nThreads = ',nThreads
./pkg/autodiff/global_max_ad.F 165 GLOBAL_ADMAX_R8 
       DO I=2,nThreads
./pkg/autodiff/global_max_ad.F 78 GLOBAL_ADMAX_R4 
       DO I=2,nThreads
./pkg/autodiff/global_sum_ad.F 134 GLOBAL_ADSUM_R8 
      DO I=1,nThreads
./pkg/autodiff/global_sum_ad.F 63 GLOBAL_ADSUM_R4 
      DO I=1,nThreads
./verification/aim.5l_Equatorial_Channel/code/EEPARAMS.h 169 NO PROCEDURE 
     & myPx, myPy, myXGlobalLo, myYGlobalLo, nThreads,
./verification/aim.5l_Equatorial_Channel/code/EEPARAMS.h 185 NO PROCEDURE 
      INTEGER nThreads
./verification/aim.5l_cs/code/EEPARAMS.h 169 NO PROCEDURE 
     & myPx, myPy, myXGlobalLo, myYGlobalLo, nThreads,
./verification/aim.5l_cs/code/EEPARAMS.h 185 NO PROCEDURE 
      INTEGER nThreads
./eesupp/src/global_sum.F 163 GLOBAL_SUM_R8 
       DO I=1,nThreads
./eesupp/src/global_sum.F 254 GLOBAL_SUM_INT 
       DO I=1,nThreads
./eesupp/src/global_sum.F 70 GLOBAL_SUM_R4 
       DO I=1,nThreads
./verification/aim.5l_LatLon/code/EEPARAMS.h 169 NO PROCEDURE 
     & myPx, myPy, myXGlobalLo, myYGlobalLo, nThreads,
./verification/aim.5l_LatLon/code/EEPARAMS.h 185 NO PROCEDURE 
      INTEGER nThreads
./verification/cpl_aim+ocn/code_atm/EEPARAMS.h 169 NO PROCEDURE 
     & myPx, myPy, myXGlobalLo, myYGlobalLo, nThreads,
./verification/cpl_aim+ocn/code_atm/EEPARAMS.h 185 NO PROCEDURE 
      INTEGER nThreads
./eesupp/src/global_max.F 157 GLOBAL_MAX_R8 
       DO I=2,nThreads
./eesupp/src/global_max.F 71 GLOBAL_MAX_R4 
       DO I=2,nThreads
./eesupp/src/comm_stats.F 118 COMM_STATS 
       DO I=1,nThreads
./eesupp/src/main.F 127 NO PROCEDURE 
        CALL PTINIT(nThreads)
./eesupp/src/main.F 141 NO PROCEDURE 
      DO I=1,nThreads
./eesupp/src/bar2.F 125 BAR2 
        DO I = 2, nThreads
./eesupp/src/bar2.F 129 BAR2 
       IF ( nDone .LT. nThreads ) GOTO 12
./eesupp/src/gsum.F 129 GSUM_R8 
        DO I = 2, nThreads
./eesupp/src/gsum.F 132 GSUM_R8 
       IF ( nDone .LT. nThreads ) GOTO 12
./eesupp/src/gsum.F 139 GSUM_R8 
       DO I = 2,nThreads
./eesupp/src/eedie.F 46 EEDIE 
      DO I = 1, nThreads
./eesupp/src/eedie.F 49 EEDIE 
      IF ( nThreadsDone .LT. nThreads ) THEN
./eesupp/src/eedie.F 52 EEDIE 
     & ' threads have completed, ',nThreads,
./eesupp/inc/EEPARAMS.h 169 NO PROCEDURE 
     & myPx, myPy, myXGlobalLo, myYGlobalLo, nThreads,
./eesupp/inc/EEPARAMS.h 185 NO PROCEDURE 
      INTEGER nThreads
./eesupp/src/print.F 123 PRINT_ERROR 
      IF ( numberOfProcs .EQ. 1 .AND. nThreads .EQ. 1 ) THEN
./eesupp/src/print.F 1411 PRINT_MESSAGE 
      IF ( numberOfProcs .EQ. 0 .AND. nThreads .EQ. 1 ) THEN
./eesupp/src/print.F 1453 PRINT_MESSAGE 
      IF ( numberOfProcs .EQ. 1 .AND. nThreads .EQ. 1
./eesupp/src/print.F 79 PRINT_ERROR 
      IF ( numberOfProcs .EQ. 0 .AND. nThreads .EQ. 1 ) THEN
./eesupp/src/ini_threading_environment.F 100 INI_THREADING_ENVIRONMENT 
      IF   ( nThreads .NE. nTx*nTy ) THEN
./eesupp/src/ini_threading_environment.F 104 INI_THREADING_ENVIRONMENT 
     &  ' nTx * nTy = ',nTx*nTy,' nThreads = ',nThreads
./eesupp/src/ini_threading_environment.F 147 INI_THREADING_ENVIRONMENT 
      DO nT=1,nThreads
./eesupp/src/ini_threading_environment.F 164 INI_THREADING_ENVIRONMENT 
      DO I=1,nThreads
./eesupp/src/ini_threading_environment.F 88 INI_THREADING_ENVIRONMENT 
      nThreads = nTx * nTy
./eesupp/src/check_threads.F 67 CHECK_THREADS 
      DO I = 1, nThreads
./eesupp/src/check_threads.F 76 CHECK_THREADS 
     &  ' thread(s), ',nThreads,' are needed for this configuration!'
./eesupp/src/check_threads.F 89 CHECK_THREADS 
      IF ( numberThreadsRunning .NE. nThreads ) THEN