Symbol Description Uses
DEBUG_CALL 144


File Line number Procedure Code
./model/src/the_main_loop.F 205 THE_MAIN_LOOP 
      IF (debugMode) CALL DEBUG_CALL('INITIALISE_VARIA',myThid)
./model/src/the_main_loop.F 214 THE_MAIN_LOOP 
      IF (debugMode) CALL DEBUG_CALL('MONITOR',myThid)
./model/src/the_main_loop.F 224 THE_MAIN_LOOP 
      IF (debugMode) CALL DEBUG_CALL('DO_THE_MODEL_IO',myThid)
./model/src/the_main_loop.F 438 THE_MAIN_LOOP 
      IF (debugMode) CALL DEBUG_CALL('',myThid)
./model/src/the_main_loop.F 447 THE_MAIN_LOOP 
      IF (debugMode) CALL DEBUG_CALL('FORWARD_STEP',myThid)
./model/src/packages_init_variables.F 102 PACKAGES_INIT_VARIABLES 
      IF (debugMode) CALL DEBUG_CALL('CD_CODE_INI',myThid)
./model/src/packages_init_variables.F 112 PACKAGES_INIT_VARIABLES 
     &       CALL DEBUG_CALL('KPP_INIT + KPP_OPEN_DIAGS',myThid)
./model/src/packages_init_variables.F 123 PACKAGES_INIT_VARIABLES 
      IF (debugMode) CALL DEBUG_CALL('PP81_INIT',myThid)
./model/src/packages_init_variables.F 140 PACKAGES_INIT_VARIABLES 
      IF (debugMode) CALL DEBUG_CALL('GGL90_INIT',myThid)
./model/src/packages_init_variables.F 149 PACKAGES_INIT_VARIABLES 
      IF (debugMode) CALL DEBUG_CALL('SEAICE_INIT',myThid)
./model/src/packages_init_variables.F 167 PACKAGES_INIT_VARIABLES 
      IF (debugMode) CALL DEBUG_CALL('PTRACERS_INIT_VARIA',myThid)
./model/src/packages_init_variables.F 186 PACKAGES_INIT_VARIABLES 
      IF (debugMode) CALL DEBUG_CALL('LAND_INI_VARS',myThid)
./model/src/packages_init_variables.F 206 PACKAGES_INIT_VARIABLES 
      IF (debugMode) CALL DEBUG_CALL('EXF_INIT',myThid)
./model/src/packages_init_variables.F 212 PACKAGES_INIT_VARIABLES 
      IF (debugMode) CALL DEBUG_CALL('INI_FORCING',myThid)
./model/src/packages_init_variables.F 239 PACKAGES_INIT_VARIABLES 
      IF (debugMode) CALL DEBUG_CALL('OBCS_INIT_VARIABLES',myThid)
./model/src/packages_init_variables.F 250 PACKAGES_INIT_VARIABLES 
      IF (debugMode) CALL DEBUG_CALL('THSICE_INI_VARS',myThid)
./model/src/packages_init_variables.F 257 PACKAGES_INIT_VARIABLES 
      IF (debugMode) CALL DEBUG_CALL('CPL_INI_VARS',myThid)
./model/src/packages_init_variables.F 265 PACKAGES_INIT_VARIABLES 
      IF (debugMode) CALL DEBUG_CALL('FIZHI_INIT_VARS',myThid)
./model/src/packages_init_variables.F 272 PACKAGES_INIT_VARIABLES 
      IF (debugMode) CALL DEBUG_CALL('MATRIX_INIT',myThid)
./model/src/packages_init_variables.F 94 PACKAGES_INIT_VARIABLES 
      IF (debugMode) CALL DEBUG_CALL('CD_CODE_INI',myThid)
./model/src/load_fields_driver.F 133 LOAD_FIELDS_DRIVER 
     &   CALL DEBUG_CALL('BULKF_FIELDS_LOAD',myThid)
./model/src/load_fields_driver.F 145 LOAD_FIELDS_DRIVER 
     &   CALL DEBUG_CALL('EXF_GETFORCING',myThid)
./model/src/load_fields_driver.F 160 LOAD_FIELDS_DRIVER 
     &   CALL DEBUG_CALL('EXTERNAL_FIELDS_LOAD',myThid)
./model/src/load_fields_driver.F 181 LOAD_FIELDS_DRIVER 
     &   CALL DEBUG_CALL('OFFLINE_FIELDS_LOAD',myThid)
./model/src/load_fields_driver.F 193 LOAD_FIELDS_DRIVER 
     &   CALL DEBUG_CALL('GCHEM_FIELDS_LOAD',myThid)
./verification/OpenAD/code_ad_openad/the_main_loop.F 139 THE_MAIN_LOOP 
      IF (debugMode) CALL DEBUG_CALL('INITIALISE_VARIA',myThid)
./verification/OpenAD/code_ad_openad/the_main_loop.F 149 THE_MAIN_LOOP 
      IF (debugMode) CALL DEBUG_CALL('MONITOR',myThid)
./verification/OpenAD/code_ad_openad/the_main_loop.F 159 THE_MAIN_LOOP 
      IF (debugMode) CALL DEBUG_CALL('DO_THE_MODEL_IO',myThid)
./verification/OpenAD/code_ad_openad/the_main_loop.F 253 THE_MAIN_LOOP 
            IF (debugMode) CALL DEBUG_CALL('THE_FIRST_LEVEL_LOOP',myThid)
./verification/OpenAD/code_ad_openad/the_main_loop.F 278 THE_MAIN_LOOP 
         IF (debugMode) CALL DEBUG_CALL('THE_FIRST_LEVEL_PLAIN',myThid)
./verification/OpenAD/code_ad_openad/the_first_level_loop.F 90 THE_FIRST_LEVEL_LOOP 
      IF (debugMode) CALL DEBUG_CALL('FORWARD_STEP',myThid)
./verification/OpenAD/code_ad_openad/the_fourth_level_loop.F 102 THE_FOURTH_LEVEL_LOOP 
         IF (debugMode) CALL DEBUG_CALL('THE_THIRD_LEVEL_PLAIN',myThid)
./verification/OpenAD/code_ad_openad/the_fourth_level_loop.F 189 THE_FOURTH_LEVEL_PLAIN 
            IF (debugMode) CALL DEBUG_CALL('THE_THIRD_LEVEL_LOOP',myThid)
./verification/OpenAD/code_ad_openad/the_fourth_level_loop.F 197 THE_FOURTH_LEVEL_PLAIN 
         IF (debugMode) CALL DEBUG_CALL('THE_THIRD_LEVEL_PLAIN',myThid)
./verification/OpenAD/code_ad_openad/the_fourth_level_loop.F 94 THE_FOURTH_LEVEL_LOOP 
            IF (debugMode) CALL DEBUG_CALL('THE_THIRD_LEVEL_LOOP',myThid)
./verification/OpenAD/code_ad_openad/the_third_level_loop.F 103 THE_THIRD_LEVEL_LOOP 
         IF (debugMode) CALL DEBUG_CALL('THE_SECOND_LEVEL_PLAIN',myThid)
./verification/OpenAD/code_ad_openad/the_third_level_loop.F 191 THE_THIRD_LEVEL_PLAIN 
            IF (debugMode) CALL DEBUG_CALL('THE_SECOND_LEVEL_LOOP',myThid)
./verification/OpenAD/code_ad_openad/the_third_level_loop.F 199 THE_THIRD_LEVEL_PLAIN 
         IF (debugMode) CALL DEBUG_CALL('THE_SECOND_LEVEL_PLAIN',myThid)
./verification/OpenAD/code_ad_openad/the_third_level_loop.F 95 THE_THIRD_LEVEL_LOOP 
            IF (debugMode) CALL DEBUG_CALL('THE_SECOND_LEVEL_LOOP',myThid)
./verification/OpenAD/code_ad_openad/the_model_main.F 522 THE_MODEL_MAIN 
      IF (debugMode) CALL DEBUG_CALL('INITIALISE_FIXED',myThid)
./verification/OpenAD/code_ad_openad/the_model_main.F 594 THE_MODEL_MAIN 
      IF (debugMode) CALL DEBUG_CALL('THE_MAIN_LOOP',myThid)
./verification/OpenAD/code_ad_openad/the_model_main.F 639 THE_MODEL_MAIN 
      IF (debugMode) CALL DEBUG_CALL('THE_MAIN_LOOP',myThid)
./verification/OpenAD/code_ad_openad/the_second_level_loop.F 101 THE_SECOND_LEVEL_LOOP 
            IF (debugMode) CALL DEBUG_CALL('THE_FIRST_LEVEL_LOOP',myThid)
./verification/OpenAD/code_ad_openad/the_second_level_loop.F 197 THE_SECOND_LEVEL_PLAIN 
            IF (debugMode) CALL DEBUG_CALL('THE_FIRST_LEVEL_LOOP',myThid)
./model/src/dynamics.F 608 DYNAMICS 
     &     CALL DEBUG_CALL('CALC_GW', myThid )
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 204 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('INITIALISE_VARIA',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 212 THE_MAIN_LOOP 
      IF (debugMode) CALL DEBUG_CALL('MONITOR',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 222 THE_MAIN_LOOP 
      IF (debugMode) CALL DEBUG_CALL('DO_THE_MODEL_IO',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 406 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('EXF_GETFORCING',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 423 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('SEAICE_MODEL',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 453 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('DO_OCEANIC_PHYS',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 527 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_averagesfields',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 542 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_atlantic',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 553 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_forcing',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 562 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_hyd',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 571 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('seaice_cost_driver',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 581 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_obcs',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 591 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_curmtr',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 602 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_ssh',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 613 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_drifter',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 624 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_scat',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 650 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_drift',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 659 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_driftw',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 686 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_final',myThid)
./model/src/thermodynamics.F 339 THERMODYNAMICS 
     &     CALL DEBUG_CALL('GAD_ADVECTION',myThid)
./model/src/thermodynamics.F 351 THERMODYNAMICS 
     &     CALL DEBUG_CALL('GAD_ADVECTION',myThid)
./model/src/thermodynamics.F 368 THERMODYNAMICS 
     &     CALL DEBUG_CALL('PTRACERS_ADVECTION',myThid)
./model/src/initialise_varia.F 105 INITIALISE_VARIA 
      IF (debugMode) CALL DEBUG_CALL('INI_LINEAR_PHISURF',myThid)
./model/src/initialise_varia.F 111 INITIALISE_VARIA 
      IF (debugMode) CALL DEBUG_CALL('INI_CORI',myThid)
./model/src/initialise_varia.F 117 INITIALISE_VARIA 
      IF (debugMode) CALL DEBUG_CALL('INI_CG2D',myThid)
./model/src/initialise_varia.F 135 INITIALISE_VARIA 
      IF (debugMode) CALL DEBUG_CALL('INI_CG3D',myThid)
./model/src/initialise_varia.F 145 INITIALISE_VARIA 
      IF (debugMode) CALL DEBUG_CALL('INI_MIXING',myThid)
./model/src/initialise_varia.F 157 INITIALISE_VARIA 
      IF (debugMode) CALL DEBUG_CALL('INI_DYNVARS',myThid)
./model/src/initialise_varia.F 171 INITIALISE_VARIA 
      IF (debugMode) CALL DEBUG_CALL('INI_FIELDS',myThid)
./model/src/initialise_varia.F 184 INITIALISE_VARIA 
      IF (debugMode) CALL DEBUG_CALL('PACKAGES_INIT_VARIABLES',myThid)
./model/src/initialise_varia.F 194 INITIALISE_VARIA 
      IF (debugMode) CALL DEBUG_CALL('THE_CORRECTION_STEP',myThid)
./model/src/initialise_varia.F 204 INITIALISE_VARIA 
      IF (debugMode) CALL DEBUG_CALL('CONVECTIVE_ADJUSTMENT_INI',myThid)
./model/src/initialise_varia.F 248 INITIALISE_VARIA 
      IF (debugMode) CALL DEBUG_CALL('INTEGR_CONTINUITY',myThid)
./model/src/initialise_varia.F 263 INITIALISE_VARIA 
        IF (debugMode) CALL DEBUG_CALL('UPDATE_ETAH',myThid)
./model/src/initialise_varia.F 299 INITIALISE_VARIA 
      IF (debugMode) CALL DEBUG_CALL('TIMEAVE_STATVARS',myThid)
./model/src/initialise_varia.F 312 INITIALISE_VARIA 
          IF (debugMode) CALL DEBUG_CALL('PTRACERS_STATVARS',myThid)
./model/src/initialise_varia.F 336 INITIALISE_VARIA 
      IF (debugMode) CALL DEBUG_CALL('STATE_SUMMARY',myThid)
./model/src/forward_step.F 167 FORWARD_STEP 
     & CALL DEBUG_CALL('LOAD_FIELDS_DRIVER',myThid)
./model/src/forward_step.F 178 FORWARD_STEP 
     &   CALL DEBUG_CALL('BULKF_FORCING',myThid)
./model/src/forward_step.F 212 FORWARD_STEP 
     &    CALL DEBUG_CALL('EBM',myThid)
./model/src/forward_step.F 224 FORWARD_STEP 
     & CALL DEBUG_CALL('DO_ATMOSPHERIC_PHYS',myThid)
./model/src/forward_step.F 253 FORWARD_STEP 
     &    CALL DEBUG_CALL('DO_OCEANIC_PHYS',myThid)
./model/src/forward_step.F 306 FORWARD_STEP 
     &       CALL DEBUG_CALL('GCHEM_CALC_TENDENCY',myThid)
./model/src/forward_step.F 360 FORWARD_STEP 
     &    CALL DEBUG_CALL('THERMODYNAMICS',myThid)
./model/src/forward_step.F 422 FORWARD_STEP 
     &    CALL DEBUG_CALL('DYNAMICS',myThid)
./model/src/forward_step.F 633 FORWARD_STEP 
     &   CALL DEBUG_CALL('DO_STAGGER_FIELDS_EXCH.',myThid)
./model/src/forward_step.F 650 FORWARD_STEP 
     &   CALL DEBUG_CALL('THERMODYNAMICS',myThid)
./model/src/forward_step.F 676 FORWARD_STEP 
     &    CALL DEBUG_CALL('GCHEM_FORCING_SEP',myThid)
./model/src/the_model_main.F 507 THE_MODEL_MAIN 
      IF (debugMode) CALL DEBUG_CALL('INITIALISE_FIXED',myThid)
./model/src/the_model_main.F 579 THE_MODEL_MAIN 
      IF (debugMode) CALL DEBUG_CALL('THE_MAIN_LOOP',myThid)
./model/src/the_model_main.F 618 THE_MODEL_MAIN 
      IF (debugMode) CALL DEBUG_CALL('THE_MAIN_LOOP',myThid)
./model/src/do_oceanic_phys.F 154 DO_OCEANIC_PHYS 
     &    CALL DEBUG_CALL('SEAICE_MODEL',myThid)
./model/src/do_oceanic_phys.F 169 DO_OCEANIC_PHYS 
     &    CALL DEBUG_CALL('THSICE_MAIN',myThid)
./model/src/do_oceanic_phys.F 183 DO_OCEANIC_PHYS 
     &    CALL DEBUG_CALL('SHELFICE_THERMODYNAMICS',myThid)
./model/src/do_oceanic_phys.F 335 DO_OCEANIC_PHYS 
     &       CALL DEBUG_CALL('FIND_RHO',myThid)
./model/src/do_oceanic_phys.F 360 DO_OCEANIC_PHYS 
     &       CALL DEBUG_CALL('GRAD_SIGMA',myThid)
./model/src/do_oceanic_phys.F 380 DO_OCEANIC_PHYS 
     &       CALL DEBUG_CALL('CALC_IVDC',myThid)
./model/src/do_oceanic_phys.F 413 DO_OCEANIC_PHYS 
     &     CALL DEBUG_CALL('OBCS_CALC',myThid)
./model/src/do_oceanic_phys.F 428 DO_OCEANIC_PHYS 
     &    CALL DEBUG_CALL('EXTERNAL_FORCING_SURF',myThid)
./model/src/do_oceanic_phys.F 490 DO_OCEANIC_PHYS 
     &     CALL DEBUG_CALL('GMREDI_CALC_TENSOR',myThid)
./model/src/do_oceanic_phys.F 512 DO_OCEANIC_PHYS 
     &     CALL DEBUG_CALL('KPP_CALC',myThid)
./model/src/do_oceanic_phys.F 530 DO_OCEANIC_PHYS 
     &     CALL DEBUG_CALL('PP81_CALC',myThid)
./model/src/do_oceanic_phys.F 542 DO_OCEANIC_PHYS 
     &     CALL DEBUG_CALL('MY82_CALC',myThid)
./model/src/do_oceanic_phys.F 554 DO_OCEANIC_PHYS 
     &     CALL DEBUG_CALL('GGL90_CALC',myThid)
./model/src/do_atmospheric_phys.F 73 DO_ATMOSPHERIC_PHYS 
     &     CALL DEBUG_CALL('AIM_DO_PHYSICS',myThid)
./pkg/obcs/obcs_init_variables.F 198 OBCS_INIT_VARIABLES 
      IF (debugMode) CALL DEBUG_CALL('ORLANSKI_INIT',myThid)
./pkg/obcs/obcs_init_variables.F 225 OBCS_INIT_VARIABLES 
      IF (debugMode) CALL DEBUG_CALL('OBCS_CALC',myThid)
./pkg/obcs/obcs_init_variables.F 240 OBCS_INIT_VARIABLES 
     &      CALL DEBUG_CALL('OBCS_APPLY_UV + OBCS_APPLY_TS',myThid)
./pkg/obcs/obcs_init_variables.F 256 OBCS_INIT_VARIABLES 
     &       CALL DEBUG_CALL('EXCHANGES in OBCS_INIT_VARIABLES',myThid)
./pkg/obcs/obcs_init_variables.F 272 OBCS_INIT_VARIABLES 
     &       CALL DEBUG_CALL('OBCS_APPLY_PTRACER',myThid)
./pkg/obcs/obcs_init_variables.F 291 OBCS_INIT_VARIABLES 
         IF (debugMode) CALL DEBUG_CALL(
./pkg/obcs/obcs_calc.F 354 OBCS_CALC 
      IF (debugMode) CALL DEBUG_CALL('OBCS_PRESCRIBE_READ',myThid)
./pkg/ecco/the_main_loop.F 1127 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_averagesfields',myThid)
./pkg/ecco/the_main_loop.F 1142 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_atlantic',myThid)
./pkg/ecco/the_main_loop.F 1153 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_forcing',myThid)
./pkg/ecco/the_main_loop.F 1163 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_ssh',myThid)
./pkg/ecco/the_main_loop.F 1173 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_hyd',myThid)
./pkg/ecco/the_main_loop.F 1182 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('seaice_cost_driver',myThid)
./pkg/ecco/the_main_loop.F 1192 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_obcs',myThid)
./pkg/ecco/the_main_loop.F 1202 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_curmtr',myThid)
./pkg/ecco/the_main_loop.F 1213 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_drifter',myThid)
./pkg/ecco/the_main_loop.F 1224 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_scat',myThid)
./pkg/ecco/the_main_loop.F 1236 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_drift',myThid)
./pkg/ecco/the_main_loop.F 1245 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_driftw',myThid)
./pkg/ecco/the_main_loop.F 1272 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_final',myThid)
./pkg/ecco/the_main_loop.F 273 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('INITIALISE_VARIA',myThid)
./pkg/ecco/the_main_loop.F 281 THE_MAIN_LOOP 
      IF (debugMode) CALL DEBUG_CALL('MONITOR',myThid)
./pkg/ecco/the_main_loop.F 291 THE_MAIN_LOOP 
      IF (debugMode) CALL DEBUG_CALL('DO_THE_MODEL_IO',myThid)
./pkg/ecco/the_main_loop.F 552 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('LOAD_FIELDS_DRIVER',myThid)
./pkg/ecco/the_main_loop.F 576 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('EBM',myThid)
./pkg/ecco/the_main_loop.F 588 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('DO_ATMOSPHERIC_PHYS',myThid)
./pkg/ecco/the_main_loop.F 608 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('DO_OCEANIC_PHYS',myThid)
./pkg/ecco/the_main_loop.F 658 THE_MAIN_LOOP 
     &       CALL DEBUG_CALL('GCHEM_CALC_TENDENCY',myThid)
./pkg/ecco/the_main_loop.F 710 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('THERMODYNAMICS',myThid)
./pkg/ecco/the_main_loop.F 737 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('DYNAMICS',myThid)
./pkg/ecco/the_main_loop.F 930 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('DO_STAGGER_FIELDS_EXCH.',myThid)
./pkg/ecco/the_main_loop.F 945 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('THERMODYNAMICS',myThid)
./pkg/ecco/the_main_loop.F 971 THE_MAIN_LOOP 
     &        CALL DEBUG_CALL('GCHEM_FORCING_SEP',myThid)
./pkg/debug/debug_call.F 6 DEBUG_CALL 
      SUBROUTINE DEBUG_CALL(