Symbol Description Uses
DEBUG_CALL 98


File Line number Procedure Code
./pkg/debug/debug_call.F 6 DEBUG_CALL 
      SUBROUTINE DEBUG_CALL(
./pkg/obcs/obcs_calc.F 191 OBCS_CALC 
      IF (debugMode) CALL DEBUG_CALL('OBCS_PRESCRIBE_READ',myThid)
./pkg/obcs/obcs_init_variables.F 142 OBCS_INIT_VARIABLES 
      IF (debugMode) CALL DEBUG_CALL('ORLANSKI_INIT',myThid)
./pkg/obcs/obcs_init_variables.F 168 OBCS_INIT_VARIABLES 
      IF (debugMode) CALL DEBUG_CALL('OBCS_CALC',myThid)
./pkg/obcs/obcs_init_variables.F 179 OBCS_INIT_VARIABLES 
     &     CALL DEBUG_CALL('OBCS_APPLY_UV + OBCS_APPLY_TS',myThid)
./pkg/obcs/obcs_init_variables.F 196 OBCS_INIT_VARIABLES 
     &       CALL DEBUG_CALL('EXCHANGES in OBCS_INIT_VARIABLES',myThid)
./model/src/do_atmospheric_phys.F 72 DO_ATMOSPHERIC_PHYS 
     &     CALL DEBUG_CALL('AIM_DO_PHYSICS',myThid)
./model/src/do_oceanic_phys.F 117 DO_OCEANIC_PHYS 
     &    CALL DEBUG_CALL('THSICE_MAIN',myThid)
./model/src/do_oceanic_phys.F 262 DO_OCEANIC_PHYS 
     &       CALL DEBUG_CALL('FIND_RHO',myThid)
./model/src/do_oceanic_phys.F 287 DO_OCEANIC_PHYS 
     &       CALL DEBUG_CALL('GRAD_SIGMA',myThid)
./model/src/do_oceanic_phys.F 307 DO_OCEANIC_PHYS 
     &       CALL DEBUG_CALL('CALC_IVDC',myThid)
./model/src/do_oceanic_phys.F 340 DO_OCEANIC_PHYS 
     &     CALL DEBUG_CALL('OBCS_CALC',myThid)
./model/src/do_oceanic_phys.F 355 DO_OCEANIC_PHYS 
     &    CALL DEBUG_CALL('EXTERNAL_FORCING_SURF',myThid)
./model/src/do_oceanic_phys.F 397 DO_OCEANIC_PHYS 
     &     CALL DEBUG_CALL('GMREDI_CALC_TENSOR',myThid)
./model/src/do_oceanic_phys.F 419 DO_OCEANIC_PHYS 
     &     CALL DEBUG_CALL('KPP_CALC',myThid)
./model/src/do_oceanic_phys.F 437 DO_OCEANIC_PHYS 
     &     CALL DEBUG_CALL('PP81_CALC',myThid)
./model/src/do_oceanic_phys.F 449 DO_OCEANIC_PHYS 
     &     CALL DEBUG_CALL('MY82_CALC',myThid)
./model/src/do_oceanic_phys.F 461 DO_OCEANIC_PHYS 
     &     CALL DEBUG_CALL('GGL90_CALC',myThid)
./model/src/initialise_varia.F 104 INITIALISE_VARIA 
      IF (debugMode) CALL DEBUG_CALL('INI_CORI',myThid)
./model/src/initialise_varia.F 110 INITIALISE_VARIA 
      IF (debugMode) CALL DEBUG_CALL('INI_CG2D',myThid)
./model/src/initialise_varia.F 118 INITIALISE_VARIA 
      IF (debugMode) CALL DEBUG_CALL('INI_CG3D',myThid)
./model/src/initialise_varia.F 128 INITIALISE_VARIA 
      IF (debugMode) CALL DEBUG_CALL('INI_MIXING',myThid)
./model/src/initialise_varia.F 140 INITIALISE_VARIA 
      IF (debugMode) CALL DEBUG_CALL('INI_DYNVARS',myThid)
./model/src/initialise_varia.F 150 INITIALISE_VARIA 
      IF (debugMode) CALL DEBUG_CALL('INI_FIELDS',myThid)
./model/src/initialise_varia.F 164 INITIALISE_VARIA 
      IF (debugMode) CALL DEBUG_CALL('PACKAGES_INIT_VARIABLES',myThid)
./model/src/initialise_varia.F 174 INITIALISE_VARIA 
      IF (debugMode) CALL DEBUG_CALL('THE_CORRECTION_STEP',myThid)
./model/src/initialise_varia.F 185 INITIALISE_VARIA 
      IF (debugMode) CALL DEBUG_CALL('CONVECTIVE_ADJUSTMENT_INI',myThid)
./model/src/initialise_varia.F 225 INITIALISE_VARIA 
      IF (debugMode) CALL DEBUG_CALL('INTEGR_CONTINUITY',myThid)
./model/src/initialise_varia.F 241 INITIALISE_VARIA 
        IF (debugMode) CALL DEBUG_CALL('UPDATE_ETAH',myThid)
./model/src/initialise_varia.F 275 INITIALISE_VARIA 
      IF (debugMode) CALL DEBUG_CALL('TIMEAVE_STATVARS',myThid)
./model/src/initialise_varia.F 288 INITIALISE_VARIA 
      IF (debugMode) CALL DEBUG_CALL('PTRACERS_STATVARS',myThid)
./model/src/initialise_varia.F 316 INITIALISE_VARIA 
      IF (debugMode) CALL DEBUG_CALL('STATE_SUMMARY',myThid)
./model/src/initialise_varia.F 98 INITIALISE_VARIA 
      IF (debugMode) CALL DEBUG_CALL('INI_LINEAR_PHISURF',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',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 233 PACKAGES_INIT_VARIABLES 
      IF (debugMode) CALL DEBUG_CALL('OBCS_INIT_VARIABLES',myThid)
./model/src/packages_init_variables.F 244 PACKAGES_INIT_VARIABLES 
      IF (debugMode) CALL DEBUG_CALL('THSICE_INI_VARS',myThid)
./model/src/packages_init_variables.F 251 PACKAGES_INIT_VARIABLES 
      IF (debugMode) CALL DEBUG_CALL('CPL_INI_VARS',myThid)
./model/src/packages_init_variables.F 259 PACKAGES_INIT_VARIABLES 
      IF (debugMode) CALL DEBUG_CALL('FIZHI_INIT_VARS',myThid)
./model/src/packages_init_variables.F 266 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)
./pkg/ecco/the_main_loop.F 202 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('INITIALISE_VARIA',myThid)
./pkg/ecco/the_main_loop.F 210 THE_MAIN_LOOP 
      IF (debugMode) CALL DEBUG_CALL('MONITOR',myThid)
./pkg/ecco/the_main_loop.F 220 THE_MAIN_LOOP 
      IF (debugMode) CALL DEBUG_CALL('DO_THE_MODEL_IO',myThid)
./pkg/ecco/the_main_loop.F 413 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('EXF_GETFORCING',myThid)
./pkg/ecco/the_main_loop.F 424 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('SEAICE_MODEL',myThid)
./pkg/ecco/the_main_loop.F 449 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('EBM',myThid)
./pkg/ecco/the_main_loop.F 461 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('DO_ATMOSPHERIC_PHYS',myThid)
./pkg/ecco/the_main_loop.F 470 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('DO_OCEANIC_PHYS',myThid)
./pkg/ecco/the_main_loop.F 513 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('THERMODYNAMICS',myThid)
./pkg/ecco/the_main_loop.F 528 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('DYNAMICS',myThid)
./pkg/ecco/the_main_loop.F 543 THE_MAIN_LOOP 
     &     CALL DEBUG_CALL('CALC_GW',myThid)
./pkg/ecco/the_main_loop.F 652 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('DO_STAGGER_FIELDS_EXCH.',myThid)
./pkg/ecco/the_main_loop.F 660 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('THERMODYNAMICS',myThid)
./pkg/ecco/the_main_loop.F 769 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_averagesfields',myThid)
./pkg/ecco/the_main_loop.F 784 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_atlantic',myThid)
./pkg/ecco/the_main_loop.F 795 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_forcing',myThid)
./pkg/ecco/the_main_loop.F 804 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_hyd',myThid)
./pkg/ecco/the_main_loop.F 813 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_obcs',myThid)
./pkg/ecco/the_main_loop.F 823 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_curmtr',myThid)
./pkg/ecco/the_main_loop.F 834 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_ssh',myThid)
./pkg/ecco/the_main_loop.F 845 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_drifter',myThid)
./pkg/ecco/the_main_loop.F 856 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_scat',myThid)
./pkg/ecco/the_main_loop.F 882 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_drift',myThid)
./pkg/ecco/the_main_loop.F 891 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_driftw',myThid)
./pkg/ecco/the_main_loop.F 918 THE_MAIN_LOOP 
     &    CALL DEBUG_CALL('cost_final',myThid)
./model/src/forward_step.F 151 FORWARD_STEP 
     &    CALL DEBUG_CALL('BULKF_FIELDS_LOAD',myThid)
./model/src/forward_step.F 165 FORWARD_STEP 
     &    CALL DEBUG_CALL('EXF_GETFORCING',myThid)
./model/src/forward_step.F 180 FORWARD_STEP 
     &    CALL DEBUG_CALL('EXTERNAL_FIELDS_LOAD',myThid)
./model/src/forward_step.F 228 FORWARD_STEP 
     &    CALL DEBUG_CALL('SEAICE_MODEL',myThid)
./model/src/forward_step.F 252 FORWARD_STEP 
     &        CALL DEBUG_CALL('GCHEM_FIELDS_LOAD',myThid)
./model/src/forward_step.F 274 FORWARD_STEP 
     &    CALL DEBUG_CALL('EBM',myThid)
./model/src/forward_step.F 286 FORWARD_STEP 
     &    CALL DEBUG_CALL('DO_ATMOSPHERIC_PHYS',myThid)
./model/src/forward_step.F 310 FORWARD_STEP 
     &    CALL DEBUG_CALL('DO_OCEANIC_PHYS',myThid)
./model/src/forward_step.F 338 FORWARD_STEP 
     &       CALL DEBUG_CALL('GCHEM_CALC_TENDENCY',myThid)
./model/src/forward_step.F 381 FORWARD_STEP 
     &    CALL DEBUG_CALL('THERMODYNAMICS',myThid)
./model/src/forward_step.F 413 FORWARD_STEP 
     &    CALL DEBUG_CALL('DYNAMICS',myThid)
./model/src/forward_step.F 428 FORWARD_STEP 
     &     CALL DEBUG_CALL('CALC_GW',myThid)
./model/src/forward_step.F 537 FORWARD_STEP 
     &    CALL DEBUG_CALL('DO_STAGGER_FIELDS_EXCH.',myThid)
./model/src/forward_step.F 552 FORWARD_STEP 
     &    CALL DEBUG_CALL('THERMODYNAMICS',myThid)
./model/src/forward_step.F 578 FORWARD_STEP 
     &        CALL DEBUG_CALL('GCHEM_FORCING_SEP',myThid)
./model/src/the_main_loop.F 152 THE_MAIN_LOOP 
      IF (debugMode) CALL DEBUG_CALL('INITIALISE_VARIA',myThid)
./model/src/the_main_loop.F 162 THE_MAIN_LOOP 
      IF (debugMode) CALL DEBUG_CALL('MONITOR',myThid)
./model/src/the_main_loop.F 172 THE_MAIN_LOOP 
      IF (debugMode) CALL DEBUG_CALL('DO_THE_MODEL_IO',myThid)
./model/src/the_main_loop.F 331 THE_MAIN_LOOP 
      IF (debugMode) CALL DEBUG_CALL('FORWARD_STEP',myThid)
./model/src/thermodynamics.F 306 THERMODYNAMICS 
     &     CALL DEBUG_CALL('GAD_ADVECTION',myThid)
./model/src/thermodynamics.F 320 THERMODYNAMICS 
     &     CALL DEBUG_CALL('GAD_ADVECTION',myThid)
./model/src/thermodynamics.F 337 THERMODYNAMICS 
     &     CALL DEBUG_CALL('PTRACERS_ADVECTION',myThid)
./model/src/the_model_main.F 503 THE_MODEL_MAIN 
      IF (debugMode) CALL DEBUG_CALL('INITIALISE_FIXED',myThid)
./model/src/the_model_main.F 575 THE_MODEL_MAIN 
      IF (debugMode) CALL DEBUG_CALL('THE_MAIN_LOOP',myThid)
./model/src/the_model_main.F 613 THE_MODEL_MAIN 
      IF (debugMode) CALL DEBUG_CALL('THE_MAIN_LOOP',myThid)