Symbol Description Uses
PTRACERS_numInUse number of tracers to use 108


File Line number Procedure Code
./pkg/gchem/gchem_check.F 131 GCHEM_CHECK 
      IF ( gchem_Tracer_num.GT.PTRACERS_numInUse ) THEN
./pkg/gchem/gchem_check.F 136 GCHEM_CHECK 
     &  ' exceeds number of pTr: PTRACERS_numInUse =',PTRACERS_numInUse
./pkg/gmredi/gmredi_check.F 286 GMREDI_CHECK 
        DO iTr=1,PTRACERS_numInUse
./pkg/longstep/longstep_forcing_surf.F 108 LONGSTEP_FORCING_SURF 
        DO iTrc=1,PTRACERS_numInUse
./pkg/longstep/longstep_forcing_surf.F 132 LONGSTEP_FORCING_SURF 
        DO iTrc=1,PTRACERS_numInUse
./pkg/longstep/longstep_forcing_surf.F 60 LONGSTEP_FORCING_SURF 
      DO iTrc=1,PTRACERS_numInUse
./pkg/longstep/longstep_forcing_surf.F 74 LONGSTEP_FORCING_SURF 
       DO iTrc=1,PTRACERS_numInUse
./pkg/matrix/matrix_store_tendency.F 104 MATRIX_STORE_TENDENCY_IMP 
      DO iTracer=1,PTRACERS_numInUse
./pkg/matrix/matrix_store_tendency.F 61 MATRIX_STORE_TENDENCY_EXP 
      IF ( iTracer.EQ.PTRACERS_numInUse ) THEN
./pkg/matrix/matrix_write_tendency.F 102 MATRIX_WRITE_TENDENCY 
        DO iTracer=1,PTRACERS_numInUse
./pkg/matrix/matrix_write_tendency.F 139 MATRIX_WRITE_TENDENCY 
        DO iTracer=1,PTRACERS_numInUse
./pkg/matrix/matrix_write_tendency.F 43 MATRIX_WRITE_TENDENCY 
        DO iTracer=1,PTRACERS_numInUse
./pkg/matrix/matrix_write_tendency.F 80 MATRIX_WRITE_TENDENCY 
        DO iTracer=1,PTRACERS_numInUse
./pkg/obcs/obcs_calc.F 282 OBCS_CALC 
        DO iTracer=1,PTRACERS_numInUse
./pkg/obcs/obcs_calc.F 314 OBCS_CALC 
        DO iTracer=1,PTRACERS_numInUse
./pkg/obcs/obcs_calc.F 346 OBCS_CALC 
        DO iTracer=1,PTRACERS_numInUse
./pkg/obcs/obcs_calc.F 378 OBCS_CALC 
        DO iTracer=1,PTRACERS_numInUse
./pkg/obcs/obcs_check.F 96 OBCS_CHECK 
       CALL WRITE_1D_I( OBCS_u1_adv_Tr, PTRACERS_numInUse, INDEX_NONE,
./pkg/obcs/obcs_exf_load.F 353 OBCS_EXF_READ_XZ 
       DO iTracer = 1, PTRACERS_numInUse
./pkg/obcs/obcs_exf_load.F 628 OBCS_EXF_READ_YZ 
       DO iTracer = 1, PTRACERS_numInUse
./pkg/obcs/obcs_fields_load.F 282 OBCS_FIELDS_LOAD 
       DO iTr = 1, PTRACERS_numInUse
./pkg/obcs/obcs_fields_load.F 469 OBCS_FIELDS_LOAD 
         DO iTr = 1, PTRACERS_numInUse
./pkg/obcs/obcs_fields_load.F 620 OBCS_FIELDS_LOAD 
       DO iTr = 1, PTRACERS_numInUse
./pkg/obcs/obcs_init_variables.F 300 OBCS_INIT_VARIABLES 
         DO iTracer=1,PTRACERS_numInUse
./pkg/obcs/obcs_init_variables.F 478 OBCS_INIT_VARIABLES 
        DO iTracer=1,PTRACERS_numInUse
./pkg/opps/opps_interface.F 80 OPPS_INTERFACE 
      nTracerInUse = 2+PTRACERS_numInUse
./pkg/ptracers/PTRACERS_PARAMS.h 67 NO PROCEDURE 
      INTEGER PTRACERS_numInUse
./pkg/ptracers/PTRACERS_PARAMS.h 71 NO PROCEDURE 
     &     PTRACERS_numInUse,
./pkg/ptracers/ptracers_ad_dump.F 84 PTRACERS_AD_DUMP 
        DO ip = 1, PTRACERS_numInUse
./pkg/ptracers/ptracers_calc_wsurf_tr.F 53 PTRACERS_CALC_WSURF_TR 
      DO itr=1,PTRACERS_numInUse
./pkg/ptracers/ptracers_calc_wsurf_tr.F 62 PTRACERS_CALC_WSURF_TR 
        DO itr=1,PTRACERS_numInUse
./pkg/ptracers/ptracers_calc_wsurf_tr.F 79 PTRACERS_CALC_WSURF_TR 
      DO itr=1,PTRACERS_numInUse
./pkg/ptracers/ptracers_calc_wsurf_tr.F 87 PTRACERS_CALC_WSURF_TR 
       DO itr=1,PTRACERS_numInUse
./pkg/ptracers/ptracers_check.F 171 PTRACERS_CHECK 
      DO iTracer=1,PTRACERS_numInUse
./pkg/ptracers/ptracers_check.F 193 PTRACERS_CHECK 
      DO iTracer=1,PTRACERS_numInUse
./pkg/ptracers/ptracers_check.F 56 PTRACERS_CHECK 
      CALL WRITE_0D_I( PTRACERS_numInUse, INDEX_NONE,
./pkg/ptracers/ptracers_check.F 97 PTRACERS_CHECK 
      DO iTracer=1,PTRACERS_numInUse
./pkg/ptracers/ptracers_check_pickup.F 75 PTRACERS_CHECK_PICKUP 
         DO i=1,PTRACERS_numInUse
./pkg/ptracers/ptracers_convect.F 52 PTRACERS_CONVECT 
      DO iTracer=1,PTRACERS_numInUse
./pkg/ptracers/ptracers_diagnostics_state.F 66 PTRACERS_DIAGNOSTICS_STATE 
       DO iTr = 1,PTRACERS_numInUse
./pkg/ptracers/ptracers_dyn_state_mod.F 17 PTRACERS_INIT_FIXED_DYNAMIC 
     &                                  PTRACERS_numInUse,
./pkg/ptracers/ptracers_dyn_state_mod.F 26 PTRACERS_INIT_FIXED_DYNAMIC 
        INTEGER PTRACERS_numInUse
./pkg/ptracers/ptracers_dyn_state_mod.F 27 PTRACERS_INIT_FIXED_DYNAMIC 
        LOGICAL PTRACERS_SOM_Advection(PTRACERS_numInUse)
./pkg/ptracers/ptracers_dyn_state_mod.F 33 PTRACERS_INIT_FIXED_DYNAMIC 
        ALLOCATE( PTR_ISTATE_ARR(PTRACERS_numInUse) )
./pkg/ptracers/ptracers_dyn_state_mod.F 35 PTRACERS_INIT_FIXED_DYNAMIC 
        DO iPtr = 1, PTRACERS_numInUse
./pkg/ptracers/ptracers_fields_blocking_exch.F 46 PTRACERS_FIELDS_BLOCKING_EXCH 
      DO iTracer=1,PTRACERS_numInUse
./pkg/ptracers/ptracers_forcing_surf.F 121 PTRACERS_FORCING_SURF 
       DO iTrc=1,PTRACERS_numInUse
./pkg/ptracers/ptracers_forcing_surf.F 154 PTRACERS_FORCING_SURF 
        DO iTrc=1,PTRACERS_numInUse
./pkg/ptracers/ptracers_forcing_surf.F 176 PTRACERS_FORCING_SURF 
        DO iTrc=1,PTRACERS_numInUse
./pkg/ptracers/ptracers_forcing_surf.F 65 PTRACERS_FORCING_SURF 
      DO iTrc=1,PTRACERS_numInUse
./pkg/ptracers/ptracers_init_fixed.F 135 PTRACERS_INIT_FIXED 
     &                                  PTRACERS_numInUse,
./pkg/ptracers/ptracers_init_fixed.F 59 PTRACERS_INIT_FIXED 
      DO iTracer = 1, PTRACERS_numInUse
./pkg/ptracers/ptracers_init_varia.F 100 PTRACERS_INIT_VARIA 
       DO iTracer = 1, PTRACERS_numInUse
./pkg/ptracers/ptracers_init_varia.F 111 PTRACERS_INIT_VARIA 
      DO iTracer = 1, PTRACERS_numInUse
./pkg/ptracers/ptracers_integrate.F 149 PTRACERS_INTEGRATE 
      DO iTracer=1,PTRACERS_numInUse
./pkg/ptracers/ptracers_mnc_init.F 40 PTRACERS_MNC_INIT 
        DO ii = 1,PTRACERS_numInUse
./pkg/ptracers/ptracers_monitor.F 111 PTRACERS_MONITOR 
       DO ip = 1, PTRACERS_numInUse
./pkg/ptracers/ptracers_monitor_ad.F 109 ADPTRACERS_MONITOR 
       DO ip = 1, PTRACERS_numInUse
./pkg/ptracers/ptracers_read_pickup.F 175 PTRACERS_READ_PICKUP 
        DO iTracer = 1, PTRACERS_numInUse
./pkg/ptracers/ptracers_read_pickup.F 193 PTRACERS_READ_PICKUP 
        DO iTracer = 1, PTRACERS_numInUse
./pkg/ptracers/ptracers_read_pickup.F 208 PTRACERS_READ_PICKUP 
        DO iTracer = 1, PTRACERS_numInUse
./pkg/ptracers/ptracers_read_pickup.F 226 PTRACERS_READ_PICKUP 
        DO iTracer = 1, PTRACERS_numInUse
./pkg/ptracers/ptracers_read_pickup.F 235 PTRACERS_READ_PICKUP 
        DO iTracer = 1, PTRACERS_numInUse
./pkg/ptracers/ptracers_read_pickup.F 281 PTRACERS_READ_PICKUP 
       DO iTracer = 1, PTRACERS_numInUse
./pkg/ptracers/ptracers_read_pickup.F 76 PTRACERS_READ_PICKUP 
        DO iTracer = 1, PTRACERS_numInUse
./pkg/ptracers/ptracers_read_pickup.F 83 PTRACERS_READ_PICKUP 
        DO iTracer = 1, PTRACERS_numInUse
./pkg/ptracers/ptracers_read_pickup.F 91 PTRACERS_READ_PICKUP 
       DO iTracer = 1, PTRACERS_numInUse
./pkg/ptracers/ptracers_readparms.F 108 PTRACERS_READPARMS 
      PTRACERS_numInUse=-1
./pkg/ptracers/ptracers_readparms.F 199 PTRACERS_READPARMS 
      IF (PTRACERS_numInUse.LT.0) THEN
./pkg/ptracers/ptracers_readparms.F 200 PTRACERS_READPARMS 
        PTRACERS_numInUse=PTRACERS_num
./pkg/ptracers/ptracers_readparms.F 204 PTRACERS_READPARMS 
      IF (PTRACERS_numInUse.GT.PTRACERS_num) THEN
./pkg/ptracers/ptracers_readparms.F 206 PTRACERS_READPARMS 
     &       ' PTRACERS_READPARMS: You requested',PTRACERS_numInUse,
./pkg/ptracers/ptracers_readparms.F 214 PTRACERS_READPARMS 
      DO iTracer=1,PTRACERS_numInUse
./pkg/ptracers/ptracers_readparms.F 224 PTRACERS_READPARMS 
      DO iTracer=1,PTRACERS_numInUse
./pkg/ptracers/ptracers_readparms.F 51 PTRACERS_READPARMS 
     &     PTRACERS_numInUse,
./pkg/ptracers/ptracers_switch_onoff.F 47 PTRACERS_SWITCH_ONOFF 
        DO iTracer=1,PTRACERS_numInUse
./pkg/ptracers/ptracers_timeave.F 60 PTRACERS_TIMEAVE 
        DO iTr=1,PTRACERS_numInUse
./pkg/ptracers/ptracers_timeave.F 81 PTRACERS_TIMEAVE 
       DO iTr=1,PTRACERS_numInUse
./pkg/ptracers/ptracers_timeave.F 93 PTRACERS_TIMEAVE 
        DO iTr=1,PTRACERS_numInUse
./pkg/ptracers/ptracers_write_pickup.F 101 PTRACERS_WRITE_PICKUP 
        DO iTracer = 1,PTRACERS_numInUse
./pkg/ptracers/ptracers_write_pickup.F 107 PTRACERS_WRITE_PICKUP 
       DO iTracer = 1, PTRACERS_numInUse
./pkg/ptracers/ptracers_write_pickup.F 134 PTRACERS_WRITE_PICKUP 
        DO iTracer = 1, PTRACERS_numInUse
./pkg/ptracers/ptracers_write_pickup.F 144 PTRACERS_WRITE_PICKUP 
        DO iTracer = 1, PTRACERS_numInUse
./pkg/ptracers/ptracers_write_pickup.F 186 PTRACERS_WRITE_PICKUP 
        DO iTracer = 1, PTRACERS_numInUse
./pkg/ptracers/ptracers_write_pickup.F 94 PTRACERS_WRITE_PICKUP 
        DO iTracer = 1,PTRACERS_numInUse
./pkg/ptracers/ptracers_write_state.F 74 PTRACERS_WRITE_STATE 
        DO iTracer = 1,PTRACERS_numInUse
./pkg/ptracers/ptracers_write_state.F 84 PTRACERS_WRITE_STATE 
        DO iTracer=1,PTRACERS_numInUse
./pkg/ptracers/ptracers_write_timeave.F 124 PTRACERS_WRITE_TIMEAVE 
          DO iTr=1,PTRACERS_numInUse
./pkg/ptracers/ptracers_write_timeave.F 67 PTRACERS_WRITE_TIMEAVE 
            DO iTr=1,PTRACERS_numInUse
./pkg/ptracers/ptracers_write_timeave.F 99 PTRACERS_WRITE_TIMEAVE 
          DO iTr = 1,PTRACERS_numInUse
./pkg/ptracers/ptracers_zonal_filt_apply.F 42 PTRACERS_ZONAL_FILT_APPLY 
      DO iTr = 1,PTRACERS_numInUse
./pkg/rbcs/rbcs_fields_load.F 190 RBCS_FIELDS_LOAD 
        DO iTracer = 1, PTRACERS_numInUse
./pkg/rbcs/rbcs_fields_load.F 262 RBCS_FIELDS_LOAD 
       DO iTracer = 1, PTRACERS_numInUse
./pkg/rbcs/rbcs_init_fixed.F 156 RBCS_INIT_FIXED 
      IF ( usePTRACERS .AND. PTRACERS_numInUse.GE.1 ) THEN
./pkg/rbcs/rbcs_init_fixed.F 157 RBCS_INIT_FIXED 
       DO iTr=1,PTRACERS_numInUse
./verification/tutorial_global_oce_latlon/code/ptracers_forcing_surf.F 124 PTRACERS_FORCING_SURF 
       DO iTrc=1,PTRACERS_numInUse
./verification/tutorial_global_oce_latlon/code/ptracers_forcing_surf.F 157 PTRACERS_FORCING_SURF 
        DO iTrc=1,PTRACERS_numInUse
./verification/tutorial_global_oce_latlon/code/ptracers_forcing_surf.F 179 PTRACERS_FORCING_SURF 
        DO iTrc=1,PTRACERS_numInUse
./verification/tutorial_global_oce_latlon/code/ptracers_forcing_surf.F 65 PTRACERS_FORCING_SURF 
      DO iTrc=1,PTRACERS_numInUse
./verification/tutorial_tracer_adjsens/code_ad/ptracers_forcing_surf.F 119 PTRACERS_FORCING_SURF 
       DO iTrc=1,PTRACERS_numInUse
./verification/tutorial_tracer_adjsens/code_ad/ptracers_forcing_surf.F 151 PTRACERS_FORCING_SURF 
        DO iTrc=1,PTRACERS_numInUse
./verification/tutorial_tracer_adjsens/code_ad/ptracers_forcing_surf.F 172 PTRACERS_FORCING_SURF 
        DO iTrc=1,PTRACERS_numInUse
./verification/tutorial_tracer_adjsens/code_ad/ptracers_forcing_surf.F 64 PTRACERS_FORCING_SURF 
      DO iTrc=1,PTRACERS_numInUse
./verification/tutorial_tracer_adjsens/code_oad/ptracers_forcing_surf.F 119 PTRACERS_FORCING_SURF 
       DO iTrc=1,PTRACERS_numInUse
./verification/tutorial_tracer_adjsens/code_oad/ptracers_forcing_surf.F 151 PTRACERS_FORCING_SURF 
        DO iTrc=1,PTRACERS_numInUse
./verification/tutorial_tracer_adjsens/code_oad/ptracers_forcing_surf.F 172 PTRACERS_FORCING_SURF 
        DO iTrc=1,PTRACERS_numInUse
./verification/tutorial_tracer_adjsens/code_oad/ptracers_forcing_surf.F 64 PTRACERS_FORCING_SURF 
      DO iTrc=1,PTRACERS_numInUse
./model/src/thermodynamics.F 155 THERMODYNAMICS 
      DO k=1,PTRACERS_numInUse