Symbol Description Uses
DEBUG_CALL 210



File Line number Procedure Code
./pkg/longstep/longstep_thermodynamics.F 271 LONGSTEP_THERMODYNAMICS
          IF (debugMode) CALL DEBUG_CALL('PTRACERS_ADVECTION',myThid)
./pkg/obcs/obcs_calc.F 405 OBCS_CALC
        IF (debugMode) CALL DEBUG_CALL('OBCS_PRESCRIBE_READ',myThid)
./pkg/obcs/obcs_calc.F 422 OBCS_CALC
       IF (debugMode) CALL DEBUG_CALL('OBCS_CALC_STEVENS',myThid)
./pkg/obcs/obcs_init_variables.F 321 OBCS_INIT_VARIABLES
      IF (debugMode) CALL DEBUG_CALL('ORLANSKI_INIT',myThid)
./pkg/obcs/obcs_init_variables.F 340 OBCS_INIT_VARIABLES
       IF (debugMode) CALL DEBUG_CALL('OBCS_CALC',myThid)
./pkg/obcs/obcs_init_variables.F 349 OBCS_INIT_VARIABLES
     &    CALL DEBUG_CALL('OBCS_APPLY_UV + OBCS_APPLY_TS',myThid)
./pkg/obcs/obcs_init_variables.F 363 OBCS_INIT_VARIABLES
     &    CALL DEBUG_CALL('EXCHANGES in OBCS_INIT_VARIABLES',myThid)
./pkg/obcs/obcs_init_variables.F 397 OBCS_INIT_VARIABLES
     &       CALL DEBUG_CALL('OBCS_APPLY_PTRACER',myThid)
./pkg/obcs/obcs_init_variables.F 418 OBCS_INIT_VARIABLES
         IF (debugMode) CALL DEBUG_CALL(
./pkg/ptracers/ptracers_advection.F 89 PTRACERS_ADVECTION
         IF (debugMode) CALL DEBUG_CALL('GAD_SOM_ADVECT',myThid)
./model/src/do_atmospheric_phys.F 63 DO_ATMOSPHERIC_PHYS
        IF (debugMode) CALL DEBUG_CALL('AIM_DO_PHYSICS',myThid)
./model/src/do_oceanic_phys.F 155 DO_OCEANIC_PHYS
       IF (debugMode) CALL DEBUG_CALL('OBCS_CALC',myThid)
./model/src/do_oceanic_phys.F 237 DO_OCEANIC_PHYS
        IF (debugMode) CALL DEBUG_CALL('SEAICE_MODEL',myThid)
./model/src/do_oceanic_phys.F 262 DO_OCEANIC_PHYS
        IF (debugMode) CALL DEBUG_CALL('THSICE_MAIN',myThid)
./model/src/do_oceanic_phys.F 279 DO_OCEANIC_PHYS
       IF (debugMode) CALL DEBUG_CALL('SHELFICE_THERMODYNAMICS',myThid)
./model/src/do_oceanic_phys.F 294 DO_OCEANIC_PHYS
       IF (debugMode) CALL DEBUG_CALL('ICEFRONT_THERMODYNAMICS',myThid)
./model/src/do_oceanic_phys.F 461 DO_OCEANIC_PHYS
          IF (debugMode) CALL DEBUG_CALL('FIND_RHO_2D',myThid)
./model/src/do_oceanic_phys.F 519 DO_OCEANIC_PHYS
            IF (debugMode) CALL DEBUG_CALL('GRAD_SIGMA',myThid)
./model/src/do_oceanic_phys.F 547 DO_OCEANIC_PHYS
            IF (debugMode) CALL DEBUG_CALL('CALC_IVDC',myThid)
./model/src/do_oceanic_phys.F 598 DO_OCEANIC_PHYS
        IF (debugMode) CALL DEBUG_CALL('EXTERNAL_FORCING_SURF',myThid)
./model/src/do_oceanic_phys.F 653 DO_OCEANIC_PHYS
          IF (debugMode) CALL DEBUG_CALL('KPP_CALC',myThid)
./model/src/do_oceanic_phys.F 672 DO_OCEANIC_PHYS
          IF (debugMode) CALL DEBUG_CALL('PP81_CALC',myThid)
./model/src/do_oceanic_phys.F 683 DO_OCEANIC_PHYS
          IF (debugMode) CALL DEBUG_CALL('MY82_CALC',myThid)
./model/src/do_oceanic_phys.F 698 DO_OCEANIC_PHYS
          IF (debugMode) CALL DEBUG_CALL('GGL90_CALC',myThid)
./model/src/do_oceanic_phys.F 736 DO_OCEANIC_PHYS
          IF (debugMode) CALL DEBUG_CALL('GMREDI_CALC_TENSOR',myThid)
./pkg/seaice/seaice_model.F 159 SEAICE_MODEL
      IF (debugMode) CALL DEBUG_CALL( 'SEAICE_DYNSOLVER', myThid )
./pkg/seaice/seaice_model.F 190 SEAICE_MODEL
       IF (debugMode) CALL DEBUG_CALL( 'SEAICE_ADVDIFF', myThid )
./pkg/seaice/seaice_model.F 215 SEAICE_MODEL
        IF (debugMode) CALL DEBUG_CALL( 'SEAICE_GROWTH', myThid )
./model/src/dynamics.F 642 DYNAMICS
         IF (debugMode) CALL DEBUG_CALL('CALC_GW', myThid )
./model/src/forward_step.F 239 FORWARD_STEP
      IF (debugMode) CALL DEBUG_CALL('',myThid)
./model/src/forward_step.F 249 FORWARD_STEP
      IF (debugMode) CALL DEBUG_CALL('LOAD_FIELDS_DRIVER',myThid)
./model/src/forward_step.F 266 FORWARD_STEP
        IF (debugMode) CALL DEBUG_CALL('BULKF_FORCING',myThid)
./model/src/forward_step.F 279 FORWARD_STEP
        IF (debugMode) CALL DEBUG_CALL('CHEAPAML',myThid)
./model/src/forward_step.F 324 FORWARD_STEP
        IF (debugMode) CALL DEBUG_CALL('EBM',myThid)
./model/src/forward_step.F 335 FORWARD_STEP
      IF (debugMode) CALL DEBUG_CALL('DO_ATMOSPHERIC_PHYS',myThid)
./model/src/forward_step.F 377 FORWARD_STEP
       IF (debugMode) CALL DEBUG_CALL('DO_OCEANIC_PHYS',myThid)
./model/src/forward_step.F 430 FORWARD_STEP
        IF (debugMode) CALL DEBUG_CALL('GCHEM_CALC_TENDENCY',myThid)
./model/src/forward_step.F 508 FORWARD_STEP
        IF (debugMode) CALL DEBUG_CALL('LONGSTEP_AVERAGE',myThid)
./model/src/forward_step.F 516 FORWARD_STEP
     &    CALL DEBUG_CALL('LONGSTEP_THERMODYNAMICS',myThid)
./model/src/forward_step.F 529 FORWARD_STEP
        IF (debugMode) CALL DEBUG_CALL('THERMODYNAMICS',myThid)
./model/src/forward_step.F 546 FORWARD_STEP
        IF (debugMode) CALL DEBUG_CALL('LONGSTEP_AVERAGE',myThid)
./model/src/forward_step.F 554 FORWARD_STEP
     &    CALL DEBUG_CALL('LONGSTEP_THERMODYNAMICS',myThid)
./model/src/forward_step.F 634 FORWARD_STEP
        IF (debugMode) CALL DEBUG_CALL('DYNAMICS',myThid)
./model/src/forward_step.F 880 FORWARD_STEP
     &   CALL DEBUG_CALL('DO_STAGGER_FIELDS_EXCH.',myThid)
./model/src/forward_step.F 896 FORWARD_STEP
        IF (debugMode) CALL DEBUG_CALL('THERMODYNAMICS',myThid)
./model/src/forward_step.F 924 FORWARD_STEP
        IF (debugMode) CALL DEBUG_CALL('LONGSTEP_AVERAGE',myThid)
./model/src/forward_step.F 934 FORWARD_STEP
     &    CALL DEBUG_CALL('LONGSTEP_THERMODYNAMICS',myThid)
./model/src/forward_step.F 971 FORWARD_STEP
         IF (debugMode) CALL DEBUG_CALL('GCHEM_FORCING_SEP',myThid)
./verification/OpenAD/code_oad_all/the_first_level_loop.F 100 THE_FIRST_LEVEL_LOOP
      IF (debugMode) CALL DEBUG_CALL('FORWARD_STEP',myThid)
./verification/OpenAD/code_oad_all/the_fourth_level_loop.F 108 THE_FOURTH_LEVEL_LOOP
            IF (debugMode) CALL DEBUG_CALL('THE_THIRD_LEVEL_LOOP',
./verification/OpenAD/code_oad_all/the_fourth_level_loop.F 212 THE_FOURTH_LEVEL_PLAIN
               IF (debugMode) CALL DEBUG_CALL('THE_THIRD_LEVEL_LOOP',
./verification/OpenAD/code_oad_all/the_fourth_level_loop.F 223 THE_FOURTH_LEVEL_PLAIN
         IF (debugMode) CALL DEBUG_CALL('THE_THIRD_LEVEL_PLAIN',myThid)
./verification/OpenAD/code_oad_all/the_model_main.F 533 THE_MODEL_MAIN
      IF (debugMode) CALL DEBUG_CALL('INITIALISE_FIXED',myThid)
./verification/OpenAD/code_oad_all/the_model_main.F 608 THE_MODEL_MAIN
      IF (debugMode) CALL DEBUG_CALL('THE_MAIN_LOOP',myThid)
./verification/OpenAD/code_oad_all/the_model_main.F 698 THE_MODEL_MAIN
      IF (debugMode) CALL DEBUG_CALL('THE_MAIN_LOOP',myThid)
./verification/OpenAD/code_oad_all/the_second_level_loop.F 115 THE_SECOND_LEVEL_LOOP
            IF (debugMode) CALL DEBUG_CALL('THE_FIRST_LEVEL_LOOP',
./verification/OpenAD/code_oad_all/the_second_level_loop.F 219 THE_SECOND_LEVEL_PLAIN
            IF (debugMode) CALL DEBUG_CALL('THE_FIRST_LEVEL_LOOP',myThid)
./verification/OpenAD/code_oad_all/the_third_level_loop.F 108 THE_THIRD_LEVEL_LOOP
            IF (debugMode) CALL DEBUG_CALL('THE_SECOND_LEVEL_LOOP',
./verification/OpenAD/code_oad_all/the_third_level_loop.F 212 THE_THIRD_LEVEL_PLAIN
               IF (debugMode) CALL DEBUG_CALL('THE_SECOND_LEVEL_LOOP',
./verification/OpenAD/code_oad_all/the_third_level_loop.F 223 THE_THIRD_LEVEL_PLAIN
         IF (debugMode) CALL DEBUG_CALL('THE_SECOND_LEVEL_PLAIN',myThid)
./model/src/initialise_varia.F 126 INITIALISE_VARIA
      IF (debugMode) CALL DEBUG_CALL('INI_LINEAR_PHISURF',myThid)
./model/src/initialise_varia.F 132 INITIALISE_VARIA
      IF (debugMode) CALL DEBUG_CALL('INI_CG2D',myThid)
./model/src/initialise_varia.F 148 INITIALISE_VARIA
      IF (debugMode) CALL DEBUG_CALL('INI_CG3D',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 177 INITIALISE_VARIA
      IF (debugMode) CALL DEBUG_CALL('INI_MIXING',myThid)
./model/src/initialise_varia.F 188 INITIALISE_VARIA
      IF (debugMode) CALL DEBUG_CALL('INI_FORCING',myThid)
./model/src/initialise_varia.F 199 INITIALISE_VARIA
      IF (debugMode) CALL DEBUG_CALL('PACKAGES_INIT_VARIABLES',myThid)
./model/src/initialise_varia.F 216 INITIALISE_VARIA
      IF (debugMode) CALL DEBUG_CALL('CONVECTIVE_ADJUSTMENT_INI',myThid)
./model/src/initialise_varia.F 260 INITIALISE_VARIA
      IF (debugMode) CALL DEBUG_CALL('INTEGR_CONTINUITY',myThid)
./model/src/initialise_varia.F 275 INITIALISE_VARIA
        IF (debugMode) CALL DEBUG_CALL('UPDATE_ETAH',myThid)
./model/src/initialise_varia.F 322 INITIALISE_VARIA
      IF (debugMode) CALL DEBUG_CALL('STATE_SUMMARY',myThid)
./model/src/initialise_varia.F 328 INITIALISE_VARIA
      IF (debugMode) CALL DEBUG_CALL('MONITOR',myThid)
./model/src/initialise_varia.F 336 INITIALISE_VARIA
      IF (debugMode) CALL DEBUG_CALL('DO_STATEVARS_TAVE',myThid)
./model/src/initialise_varia.F 344 INITIALISE_VARIA
      IF (debugMode) CALL DEBUG_CALL('DO_THE_MODEL_IO',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 203 THE_MAIN_LOOP
     &    CALL DEBUG_CALL('INITIALISE_VARIA',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 379 THE_MAIN_LOOP
     &    CALL DEBUG_CALL('EXF_GETFORCING',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 396 THE_MAIN_LOOP
     &    CALL DEBUG_CALL('SEAICE_MODEL',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 428 THE_MAIN_LOOP
     &    CALL DEBUG_CALL('DO_OCEANIC_PHYS',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 500 THE_MAIN_LOOP
     &    CALL DEBUG_CALL('cost_averagesfields',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 515 THE_MAIN_LOOP
     &    CALL DEBUG_CALL('cost_atlantic',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 526 THE_MAIN_LOOP
     &    CALL DEBUG_CALL('cost_forcing',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 535 THE_MAIN_LOOP
     &    CALL DEBUG_CALL('cost_hyd',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 544 THE_MAIN_LOOP
     &    CALL DEBUG_CALL('seaice_cost_driver',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 554 THE_MAIN_LOOP
     &    CALL DEBUG_CALL('cost_obcs',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 564 THE_MAIN_LOOP
     &    CALL DEBUG_CALL('cost_curmtr',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 575 THE_MAIN_LOOP
     &    CALL DEBUG_CALL('cost_ssh',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 586 THE_MAIN_LOOP
     &    CALL DEBUG_CALL('cost_drifter',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 597 THE_MAIN_LOOP
     &    CALL DEBUG_CALL('cost_scat',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 623 THE_MAIN_LOOP
     &    CALL DEBUG_CALL('cost_drift',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 632 THE_MAIN_LOOP
     &    CALL DEBUG_CALL('cost_driftw',myThid)
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 659 THE_MAIN_LOOP
     &    CALL DEBUG_CALL('cost_final',myThid)
./model/src/load_fields_driver.F 130 LOAD_FIELDS_DRIVER
        IF (debugMode) CALL DEBUG_CALL('BULKF_FIELDS_LOAD',myThid)
./model/src/load_fields_driver.F 142 LOAD_FIELDS_DRIVER
        IF (debugMode) CALL DEBUG_CALL('EXF_GETFORCING',myThid)
./model/src/load_fields_driver.F 154 LOAD_FIELDS_DRIVER
        IF (debugMode) CALL DEBUG_CALL('CHEAPAML_FIELDS_LOAD',myThid)
./model/src/load_fields_driver.F 164 LOAD_FIELDS_DRIVER
        IF (debugMode) CALL DEBUG_CALL('EXTERNAL_FIELDS_LOAD',myThid)
./model/src/load_fields_driver.F 181 LOAD_FIELDS_DRIVER
        IF (debugMode) CALL DEBUG_CALL('OFFLINE_FIELDS_LOAD',myThid)
./model/src/load_fields_driver.F 192 LOAD_FIELDS_DRIVER
        IF (debugMode) CALL DEBUG_CALL('GCHEM_FIELDS_LOAD',myThid)
./verification/natl_box_adjoint/code_pack/the_model_main.F 501 THE_MODEL_MAIN
      IF (debugMode) CALL DEBUG_CALL('INITIALISE_FIXED',myThid)
./verification/offline_exf_seaice/code_ad/the_main_loop.F 182 THE_MAIN_LOOP
      IF (debugMode) CALL DEBUG_CALL('INITIALISE_VARIA',myThid)
./verification/offline_exf_seaice/code_ad/the_main_loop.F 395 THE_MAIN_LOOP
      IF (debugMode) CALL DEBUG_CALL('FORWARD_STEP',myThid)
./verification/offline_exf_seaice/code_ad/the_main_loop.F 419 THE_MAIN_LOOP
     & CALL DEBUG_CALL('LOAD_FIELDS_DRIVER',myThid)
./verification/offline_exf_seaice/code_ad/the_main_loop.F 430 THE_MAIN_LOOP
     &   CALL DEBUG_CALL('BULKF_FORCING',myThid)
./verification/offline_exf_seaice/code_ad/the_main_loop.F 453 THE_MAIN_LOOP
     &    CALL DEBUG_CALL('DO_OCEANIC_PHYS',myThid)
./verification/offline_exf_seaice/code_ad/the_model_main.F 507 THE_MODEL_MAIN
      IF (debugMode) CALL DEBUG_CALL('INITIALISE_FIXED',myThid)
./verification/offline_exf_seaice/code_ad/the_model_main.F 582 THE_MODEL_MAIN
      IF (debugMode) CALL DEBUG_CALL('THE_MAIN_LOOP',myThid)
./verification/offline_exf_seaice/code_ad/the_model_main.F 621 THE_MODEL_MAIN
      IF (debugMode) CALL DEBUG_CALL('THE_MAIN_LOOP',myThid)
./model/src/packages_init_variables.F 128 PACKAGES_INIT_VARIABLES
        IF (debugMode) CALL DEBUG_CALL('GAD_INIT_VARIA',myThid)
./model/src/packages_init_variables.F 140 PACKAGES_INIT_VARIABLES
        IF (debugMode) CALL DEBUG_CALL('CD_CODE_INI_VARS',myThid)
./model/src/packages_init_variables.F 150 PACKAGES_INIT_VARIABLES
        IF (debugMode) CALL DEBUG_CALL('GMREDI_INIT_VARIA',myThid)
./model/src/packages_init_variables.F 166 PACKAGES_INIT_VARIABLES
       IF (debugMode) CALL DEBUG_CALL('KPP_INIT_VARIA',myThid)
./model/src/packages_init_variables.F 176 PACKAGES_INIT_VARIABLES
       IF (debugMode) CALL DEBUG_CALL('PP81_INIT_VARIA',myThid)
./model/src/packages_init_variables.F 193 PACKAGES_INIT_VARIABLES
      IF (debugMode) CALL DEBUG_CALL('GGL90_INIT_VARIA',myThid)
./model/src/packages_init_variables.F 205 PACKAGES_INIT_VARIABLES
       IF (debugMode) CALL DEBUG_CALL('SEAICE_INIT_VARIA',myThid)
./model/src/packages_init_variables.F 216 PACKAGES_INIT_VARIABLES
       IF (debugMode) CALL DEBUG_CALL('SHELFICE_INIT_VARIA',myThid)
./model/src/packages_init_variables.F 225 PACKAGES_INIT_VARIABLES
       IF (debugMode) CALL DEBUG_CALL('ICEFRONT_INIT_VARIA',myThid)
./model/src/packages_init_variables.F 236 PACKAGES_INIT_VARIABLES
        IF (debugMode) CALL DEBUG_CALL('PTRACERS_INIT_VARIA',myThid)
./model/src/packages_init_variables.F 241 PACKAGES_INIT_VARIABLES
        IF (debugMode) CALL DEBUG_CALL('LONGSTEP_INIT_VARIA',myThid)
./model/src/packages_init_variables.F 273 PACKAGES_INIT_VARIABLES
        IF (debugMode) CALL DEBUG_CALL('LAND_INI_VARS',myThid)
./model/src/packages_init_variables.F 286 PACKAGES_INIT_VARIABLES
      IF (debugMode) CALL DEBUG_CALL('CTRL_INIT_VARIABLES',myThid)
./model/src/packages_init_variables.F 290 PACKAGES_INIT_VARIABLES
      IF (debugMode) CALL DEBUG_CALL('CTRL_MAP_INI_ECCO',myThid)
./model/src/packages_init_variables.F 293 PACKAGES_INIT_VARIABLES
      IF (debugMode) CALL DEBUG_CALL('CTRL_MAP_INI',myThid)
./model/src/packages_init_variables.F 302 PACKAGES_INIT_VARIABLES
       IF (debugMode) CALL DEBUG_CALL('EXF_INIT',myThid)
./model/src/packages_init_variables.F 346 PACKAGES_INIT_VARIABLES
        IF (debugMode) CALL DEBUG_CALL('THSICE_INI_VARS',myThid)
./model/src/packages_init_variables.F 357 PACKAGES_INIT_VARIABLES
     &       CALL DEBUG_CALL('NEST_CHILD_INIT_VARIA',myThid)
./model/src/packages_init_variables.F 368 PACKAGES_INIT_VARIABLES
     &       CALL DEBUG_CALL('NEST_PARENT_INIT',myThid)
./model/src/packages_init_variables.F 377 PACKAGES_INIT_VARIABLES
        IF (debugMode) CALL DEBUG_CALL('CPL_INI_VARS',myThid)
./model/src/packages_init_variables.F 386 PACKAGES_INIT_VARIABLES
        IF (debugMode) CALL DEBUG_CALL('ATM2D_INIT_VARS',myThid)
./model/src/packages_init_variables.F 396 PACKAGES_INIT_VARIABLES
        IF (debugMode) CALL DEBUG_CALL('FIZHI_INIT_VARS',myThid)
./model/src/packages_init_variables.F 405 PACKAGES_INIT_VARIABLES
        IF (debugMode) CALL DEBUG_CALL('MATRIX_INIT',myThid)
./model/src/packages_init_variables.F 449 PACKAGES_INIT_VARIABLES
        IF (debugMode) CALL DEBUG_CALL('OBCS_INIT_VARIABLES',myThid)
./model/src/the_main_loop.F 233 THE_MAIN_LOOP
      IF (debugMode) CALL DEBUG_CALL('INITIALISE_VARIA',myThid)
./model/src/the_main_loop.F 454 THE_MAIN_LOOP
      IF (debugMode) CALL DEBUG_CALL('cost_averagesfields',myThid)
./model/src/the_main_loop.F 469 THE_MAIN_LOOP
      IF (debugMode) CALL DEBUG_CALL('FORWARD_STEP',myThid)
./model/src/the_model_main.F 509 THE_MODEL_MAIN
      CALL DEBUG_CALL('INITIALISE_FIXED',myThid)
./model/src/the_model_main.F 550 THE_MODEL_MAIN
      IF (debugMode) CALL DEBUG_CALL('G_THE_MAIN_LOOP',myThid)
./model/src/the_model_main.F 564 THE_MODEL_MAIN
         IF (debugMode) CALL DEBUG_CALL('MDTHE_MAIN_LOOP',myThid)
./model/src/the_model_main.F 572 THE_MODEL_MAIN
         IF (debugMode) CALL DEBUG_CALL('ADTHE_MAIN_LOOP',myThid)
./model/src/the_model_main.F 582 THE_MODEL_MAIN
      IF (debugMode) CALL DEBUG_CALL('ADTHE_MAIN_LOOP',myThid)
./model/src/the_model_main.F 596 THE_MODEL_MAIN
      IF (debugMode) CALL DEBUG_CALL('THE_MAIN_LOOP',myThid)
./model/src/the_model_main.F 600 THE_MODEL_MAIN
      IF (debugMode) CALL DEBUG_CALL('THE_MAIN_LOOP',myThid)
./model/src/the_model_main.F 635 THE_MODEL_MAIN
      IF (debugMode) CALL DEBUG_CALL('THE_MAIN_LOOP',myThid)
./model/src/thermodynamics.F 376 THERMODYNAMICS
          IF (debugMode) CALL DEBUG_CALL('GAD_SOM_ADVECT',myThid)
./model/src/thermodynamics.F 390 THERMODYNAMICS
          IF (debugMode) CALL DEBUG_CALL('GAD_ADVECTION',myThid)
./model/src/thermodynamics.F 402 THERMODYNAMICS
          IF (debugMode) CALL DEBUG_CALL('GAD_SOM_ADVECT',myThid)
./model/src/thermodynamics.F 416 THERMODYNAMICS
          IF (debugMode) CALL DEBUG_CALL('GAD_ADVECTION',myThid)
./model/src/thermodynamics.F 433 THERMODYNAMICS
         IF (debugMode) CALL DEBUG_CALL('PTRACERS_ADVECTION',myThid)
./pkg/debug/debug_call.F 6 DEBUG_CALL
      SUBROUTINE DEBUG_CALL(
./pkg/ecco/cost_averagesfields.F 128 COST_AVERAGESFIELDS
     &    CALL DEBUG_CALL('cost_averagesflags',myThid)
./pkg/ecco/cost_averagesfields.F 155 COST_AVERAGESFIELDS
     &    CALL DEBUG_CALL('cost_averagesgeneric psbar',myThid)
./pkg/ecco/cost_averagesfields.F 172 COST_AVERAGESFIELDS
     &    CALL DEBUG_CALL('cost_averagesgeneric tbar',myThid)
./pkg/ecco/cost_averagesfields.F 193 COST_AVERAGESFIELDS
     &    CALL DEBUG_CALL('cost_averagesgeneric sstbar',myThid)
./pkg/ecco/cost_averagesfields.F 209 COST_AVERAGESFIELDS
     &    CALL DEBUG_CALL('cost_averagesgeneric sbar',myThid)
./pkg/ecco/cost_averagesfields.F 404 COST_AVERAGESFIELDS
     &    CALL DEBUG_CALL('cost_averagesgeneric hfluxmeanbar',myThid)
./pkg/ecco/cost_averagesfields.F 418 COST_AVERAGESFIELDS
     &    CALL DEBUG_CALL('cost_averagesgeneric sfluxmeanbar',myThid)
./pkg/ecco/cost_averagesfields.F 428 COST_AVERAGESFIELDS
     &    CALL DEBUG_CALL('cost_averagesgeneric sfluxmeanbar',myThid)
./pkg/ecco/cost_averagesfields.F 452 COST_AVERAGESFIELDS
     &    CALL DEBUG_CALL('cost_averagesgeneric smrareabar',myThid)
./pkg/ecco/cost_averagesfields.F 462 COST_AVERAGESFIELDS
     &    CALL DEBUG_CALL('cost_averagesgeneric smrsstbar',myThid)
./pkg/ecco/cost_averagesfields.F 473 COST_AVERAGESFIELDS
     &    CALL DEBUG_CALL('cost_averagesgeneric smrsssbar',myThid)
./pkg/ecco/cost_averagesfields.F 548 COST_AVERAGESFIELDS
     &    CALL DEBUG_CALL('cost_averagesfields leave',myThid)
./pkg/ecco/ecco_cost_driver.F 114 ECCO_COST_DRIVER
      IF (debugMode) CALL DEBUG_CALL('cost_hyd',myThid)
./pkg/ecco/ecco_cost_driver.F 122 ECCO_COST_DRIVER
      IF (debugMode) CALL DEBUG_CALL('seaice_cost_driver',myThid)
./pkg/ecco/ecco_cost_driver.F 133 ECCO_COST_DRIVER
      IF (debugMode) CALL DEBUG_CALL('cost_obcs',myThid)
./pkg/ecco/ecco_cost_driver.F 142 ECCO_COST_DRIVER
      IF (debugMode) CALL DEBUG_CALL('cost_curmtr',myThid)
./pkg/ecco/ecco_cost_driver.F 153 ECCO_COST_DRIVER
      IF (debugMode) CALL DEBUG_CALL('cost_drifter',myThid)
./pkg/ecco/ecco_cost_driver.F 165 ECCO_COST_DRIVER
      IF (debugMode) CALL DEBUG_CALL('cost_scat',myThid)
./pkg/ecco/ecco_cost_driver.F 176 ECCO_COST_DRIVER
      IF (debugMode) CALL DEBUG_CALL('cost_drift',myThid)
./pkg/ecco/ecco_cost_driver.F 184 ECCO_COST_DRIVER
      IF (debugMode) CALL DEBUG_CALL('cost_driftw',myThid)
./pkg/ecco/ecco_cost_driver.F 47 ECCO_COST_DRIVER
      IF (debugMode) CALL DEBUG_CALL('cost_atlantic',myThid)
./pkg/ecco/ecco_cost_driver.F 57 ECCO_COST_DRIVER
      IF (debugMode) CALL DEBUG_CALL('cost_forcing',myThid)
./pkg/ecco/ecco_cost_driver.F 83 ECCO_COST_DRIVER
      IF (debugMode) CALL DEBUG_CALL('cost_ssh',myThid)
./pkg/ecco/the_main_loop.F 1005 THE_MAIN_LOOP
      IF (debugMode) CALL DEBUG_CALL('DO_STATEVARS_TAVE',myThid)
./pkg/ecco/the_main_loop.F 1016 THE_MAIN_LOOP
      IF (debugMode) CALL DEBUG_CALL('MONITOR',myThid)
./pkg/ecco/the_main_loop.F 1026 THE_MAIN_LOOP
      IF (debugMode) CALL DEBUG_CALL('DO_THE_MODEL_IO',myThid)
./pkg/ecco/the_main_loop.F 1038 THE_MAIN_LOOP
          IF (debugMode) CALL DEBUG_CALL('DO_WRITE_PICKUP',myThid)
./pkg/ecco/the_main_loop.F 1048 THE_MAIN_LOOP
      IF (debugMode) CALL DEBUG_CALL('DO_WRITE_PICKUP',myThid)
./pkg/ecco/the_main_loop.F 1063 THE_MAIN_LOOP
      IF (debugMode) CALL DEBUG_CALL('END OF TIMESTEP',myThid)
./pkg/ecco/the_main_loop.F 1110 THE_MAIN_LOOP
      IF (debugMode) CALL DEBUG_CALL('cost_averagesfields',myThid)
./pkg/ecco/the_main_loop.F 1124 THE_MAIN_LOOP
      IF (debugMode) CALL DEBUG_CALL('cost_atlantic',myThid)
./pkg/ecco/the_main_loop.F 1134 THE_MAIN_LOOP
      IF (debugMode) CALL DEBUG_CALL('cost_forcing',myThid)
./pkg/ecco/the_main_loop.F 1160 THE_MAIN_LOOP
      IF (debugMode) CALL DEBUG_CALL('cost_ssh',myThid)
./pkg/ecco/the_main_loop.F 1191 THE_MAIN_LOOP
      IF (debugMode) CALL DEBUG_CALL('cost_hyd',myThid)
./pkg/ecco/the_main_loop.F 1200 THE_MAIN_LOOP
      IF (debugMode) CALL DEBUG_CALL('seaice_cost_driver',myThid)
./pkg/ecco/the_main_loop.F 1210 THE_MAIN_LOOP
      IF (debugMode) CALL DEBUG_CALL('cost_obcs',myThid)
./pkg/ecco/the_main_loop.F 1219 THE_MAIN_LOOP
      IF (debugMode) CALL DEBUG_CALL('cost_curmtr',myThid)
./pkg/ecco/the_main_loop.F 1230 THE_MAIN_LOOP
      IF (debugMode) CALL DEBUG_CALL('cost_drifter',myThid)
./pkg/ecco/the_main_loop.F 1242 THE_MAIN_LOOP
      IF (debugMode) CALL DEBUG_CALL('cost_scat',myThid)
./pkg/ecco/the_main_loop.F 1253 THE_MAIN_LOOP
      IF (debugMode) CALL DEBUG_CALL('cost_drift',myThid)
./pkg/ecco/the_main_loop.F 1261 THE_MAIN_LOOP
      IF (debugMode) CALL DEBUG_CALL('cost_driftw',myThid)
./pkg/ecco/the_main_loop.F 1296 THE_MAIN_LOOP
      IF (debugMode) CALL DEBUG_CALL('cost_final',myThid)
./pkg/ecco/the_main_loop.F 262 THE_MAIN_LOOP
      IF (debugMode) CALL DEBUG_CALL('INITIALISE_VARIA',myThid)
./pkg/ecco/the_main_loop.F 469 THE_MAIN_LOOP
      IF (debugMode) CALL DEBUG_CALL('DO_STATEVARS_DIAGS',myThid)
./pkg/ecco/the_main_loop.F 482 THE_MAIN_LOOP
      IF (debugMode) CALL DEBUG_CALL('profiles_inloop',myThid)
./pkg/ecco/the_main_loop.F 492 THE_MAIN_LOOP
      IF (debugMode) CALL DEBUG_CALL('cost_averagesfields',myThid)
./pkg/ecco/the_main_loop.F 522 THE_MAIN_LOOP
      IF (debugMode) CALL DEBUG_CALL('LOAD_FIELDS_DRIVER',myThid)
./pkg/ecco/the_main_loop.F 549 THE_MAIN_LOOP
         IF (debugMode) CALL DEBUG_CALL('EBM',myThid)
./pkg/ecco/the_main_loop.F 560 THE_MAIN_LOOP
       IF (debugMode) CALL DEBUG_CALL('DO_ATMOSPHERIC_PHYS',myThid)
./pkg/ecco/the_main_loop.F 586 THE_MAIN_LOOP
       IF (debugMode) CALL DEBUG_CALL('DO_OCEANIC_PHYS',myThid)
./pkg/ecco/the_main_loop.F 624 THE_MAIN_LOOP
        IF (debugMode) CALL DEBUG_CALL('GCHEM_CALC_TENDENCY',myThid)
./pkg/ecco/the_main_loop.F 676 THE_MAIN_LOOP
        IF (debugMode) CALL DEBUG_CALL('THERMODYNAMICS',myThid)
./pkg/ecco/the_main_loop.F 702 THE_MAIN_LOOP
        IF (debugMode) CALL DEBUG_CALL('DYNAMICS',myThid)
./pkg/ecco/the_main_loop.F 840 THE_MAIN_LOOP
        IF (debugMode) CALL DEBUG_CALL('SOLVE_FOR_PRESSURE',myThid)
./pkg/ecco/the_main_loop.F 853 THE_MAIN_LOOP
     &    CALL DEBUG_CALL('MOMENTUM_CORRECTION_STEP',myThid)
./pkg/ecco/the_main_loop.F 868 THE_MAIN_LOOP
        IF (debugMode) CALL DEBUG_CALL('UPDATE_ETAH',myThid)
./pkg/ecco/the_main_loop.F 907 THE_MAIN_LOOP
     &    CALL DEBUG_CALL('DO_STAGGER_FIELDS_EXCH.',myThid)
./pkg/ecco/the_main_loop.F 923 THE_MAIN_LOOP
        IF (debugMode) CALL DEBUG_CALL('THERMODYNAMICS',myThid)
./pkg/ecco/the_main_loop.F 940 THE_MAIN_LOOP
     &    CALL DEBUG_CALL('TRACERS_CORRECTION_STEP',myThid)
./pkg/ecco/the_main_loop.F 957 THE_MAIN_LOOP
         IF (debugMode) CALL DEBUG_CALL('GCHEM_FORCING_SEP',myThid)
./pkg/ecco/the_main_loop.F 972 THE_MAIN_LOOP
     &       CALL DEBUG_CALL('DO_FIELDS_BLOCKING_EXCHANGES',myThid)
./pkg/ecco/the_main_loop.F 982 THE_MAIN_LOOP
       IF (debugMode) CALL DEBUG_CALL('DO_STATEVARS_DIAGS',myThid)