Symbol Description Uses
debugLevel controls printing of algorithm intermediate results 174



File Line number Procedure Code
./pkg/exf/exf_interp_read.F 114 EXF_INTERP_READ
         IF ( debugLevel.GE.debLevB ) THEN
./pkg/exf/exf_readparms.F 319 EXF_READPARMS
      exf_debugLev       = debugLevel
./model/inc/PARAMS.h 237 NO PROCEDURE
     &        rwSuffixType, monitorSelect, debugLevel, plotLevel
./model/inc/PARAMS.h 269 NO PROCEDURE
      INTEGER debugLevel
./pkg/generic_advdiff/gad_advection.F 820 GAD_ADVECTION
      IF ( debugLevel .GE. debLevC
./pkg/generic_advdiff/gad_calc_rhs.F 790 GAD_CALC_RHS
      IF ( debugLevel .GE. debLevC
./pkg/generic_advdiff/gad_som_advect.F 437 GAD_SOM_ADVECT
       IF ( debugLevel .GE. debLevC
./pkg/gmredi/submeso_calc_psi.F 188 SUBMESO_CALC_PSI
       IF ( debugLevel.GE.debLevD ) THEN
./pkg/gmredi/submeso_calc_psi.F 229 SUBMESO_CALC_PSI
       IF ( debugLevel.GE.debLevD ) THEN
./pkg/layers/layers_fluxcalc.F 195 LAYERS_FLUXCALC
       IF ( debugLevel .GE. debLevC ) THEN
./pkg/layers/layers_fluxcalc.F 274 LAYERS_FLUXCALC
       IF ( debugLevel .GE. debLevC ) THEN
./pkg/layers/layers_fluxcalc.F 568 LAYERS_DIAPYCNAL
       IF ( debugLevel .GE. debLevC ) THEN
./pkg/layers/layers_fluxcalc.F 592 LAYERS_DIAPYCNAL
       IF ( debugLevel .GE. debLevC ) THEN
./pkg/layers/layers_init_fixed.F 130 LAYERS_INIT_FIXED
      IF ( debugLevel .GE. debLevB ) THEN
./pkg/longstep/longstep_thermodynamics.F 243 LONGSTEP_THERMODYNAMICS
      IF ( debugLevel.GE.debLevD ) THEN
./pkg/mdsio/mdsio_gl.F 1026 MDSREADFIELD_2D_GL
          if ( debugLevel .GE. debLevB ) then
./pkg/mdsio/mdsio_gl.F 239 MDSREADFIELD_3D_GL
          if ( debugLevel .GE. debLevB ) then
./pkg/mdsio/mdsio_gl_slice.F 153 MDSREADFIELD_XZ_GL
          if ( debugLevel .GE. debLevB ) then
./pkg/mdsio/mdsio_gl_slice.F 393 MDSREADFIELD_YZ_GL
          if ( debugLevel .GE. debLevB ) then
./pkg/mdsio/mdsio_rd_rec_rl.F 50 MDS_RD_REC_RL
      IF ( debugLevel.GE.debLevC ) THEN
./pkg/mdsio/mdsio_rd_rec_rs.F 50 MDS_RD_REC_RS
      IF ( debugLevel.GE.debLevC ) THEN
./pkg/mdsio/mdsio_read_field.F 236 MDS_READ_FIELD
          IF ( debugLevel .GE. debLevB ) THEN
./pkg/mdsio/mdsio_read_field.F 250 MDS_READ_FIELD
           IF ( debugLevel .GE. debLevB ) THEN
./pkg/mdsio/mdsio_read_field.F 461 MDS_READ_FIELD
            IF ( debugLevel .GE. debLevB ) THEN
./pkg/mdsio/mdsio_read_meta.F 185 MDS_READ_META
        IF ( debugLevel .GE. debLevB ) THEN
./pkg/mdsio/mdsio_read_section.F 132 MDS_READ_SEC_XZ
       IF ( debugLevel .GE. debLevB ) THEN
./pkg/mdsio/mdsio_read_section.F 146 MDS_READ_SEC_XZ
        IF ( debugLevel .GE. debLevB ) THEN
./pkg/mdsio/mdsio_read_section.F 177 MDS_READ_SEC_XZ
          IF ( debugLevel .GE. debLevB ) THEN
./pkg/mdsio/mdsio_read_section.F 410 MDS_READ_SEC_YZ
       IF ( debugLevel .GE. debLevB ) THEN
./pkg/mdsio/mdsio_read_section.F 424 MDS_READ_SEC_YZ
        IF ( debugLevel .GE. debLevB ) THEN
./pkg/mdsio/mdsio_read_section.F 455 MDS_READ_SEC_YZ
          IF ( debugLevel .GE. debLevB ) THEN
./pkg/mdsio/mdsio_read_tape.F 127 MDS_READ_TAPE
          IF ( debugLevel .GE. debLevB ) THEN
./pkg/mdsio/mdsio_read_tape.F 190 MDS_READ_TAPE
          IF ( debugLevel .GE. debLevB ) THEN
./pkg/mdsio/mdsio_read_tape.F 212 MDS_READ_TAPE
          IF ( debugLevel .GE. debLevB ) THEN
./pkg/mdsio/mdsio_readvec_loc.F 175 MDS_READVEC_LOC
          IF ( debugLevel.GE.debLevB ) THEN
./pkg/mdsio/mdsio_readvec_loc.F 192 MDS_READVEC_LOC
          ELSEIF ( debugLevel.GE.debLevA ) THEN
./pkg/mdsio/mdsio_wr_rec_rl.F 50 MDS_WR_REC_RL
      IF ( debugLevel.GE.debLevD ) THEN
./pkg/mdsio/mdsio_wr_rec_rs.F 50 MDS_WR_REC_RS
      IF ( debugLevel.GE.debLevD ) THEN
./pkg/mdsio/mdsio_write_field.F 256 MDS_WRITE_FIELD
        IF ( debugLevel .GE. debLevC ) THEN
./pkg/mdsio/mdsio_write_tape.F 150 MDS_WRITE_TAPE
      IF ( debugLevel.GE.debLevC .AND.
./pkg/mdsio/mdsio_writelocal.F 165 MDS_WRITELOCAL
        IF ( debugLevel.GE.debLevA .AND. IL.GT.0 ) THEN
./pkg/mdsio/mdsio_writevec_loc.F 178 MDS_WRITEVEC_LOC
          IF ( debugLevel.GE.debLevC ) THEN
./model/src/cg2d.F 205 CG2D
      IF ( debugLevel .GE. debLevZero ) THEN
./model/src/cg2d_ex0.F 189 CG2D_EX0
      IF ( debugLevel .GE. debLevZero ) THEN
./model/src/cg2d_nsa.F 224 CG2D_NSA
      IF ( debugLevel .GE. debLevZero ) THEN
./model/src/cg2d_sr.F 205 CG2D_SR
      IF ( debugLevel .GE. debLevZero ) THEN
./pkg/mom_vecinv/mom_vecinv.F 852 MOM_VECINV
      IF ( debugLevel .GE. debLevC
./model/src/cg3d.F 242 CG3D
      IF ( debugLevel.GE.debLevC .AND. diagFreq.GT.0. ) THEN
./model/src/cg3d.F 251 CG3D
      IF ( debugLevel .GE. debLevZero ) THEN
./model/src/cg3d.F 517 CG3D
      IF ( debugLevel.GE.debLevC .AND. diagFreq.GT.0. ) THEN
./model/src/cg3d_ex0.F 237 CG3D_EX0
      IF ( debugLevel.GE.debLevC .AND. diagFreq.GT.0. ) THEN
./model/src/cg3d_ex0.F 244 CG3D_EX0
      IF ( debugLevel .GE. debLevZero ) THEN
./model/src/cg3d_ex0.F 500 CG3D_EX0
      IF ( debugLevel.GE.debLevC .AND. diagFreq.GT.0. ) THEN
./model/src/config_summary.F 633 CONFIG_SUMMARY
      CALL WRITE_0D_I( debugLevel, INDEX_NONE,
./pkg/obcs/obcs_balance_flow.F 124 OBCS_BALANCE_FLOW
          IF ( debugLevel.GE.debLevC ) THEN
./pkg/obcs/obcs_balance_flow.F 173 OBCS_BALANCE_FLOW
          IF ( debugLevel.GE.debLevC ) THEN
./pkg/obcs/obcs_balance_flow.F 222 OBCS_BALANCE_FLOW
          IF ( debugLevel.GE.debLevC ) THEN
./pkg/obcs/obcs_balance_flow.F 271 OBCS_BALANCE_FLOW
          IF ( debugLevel.GE.debLevC ) THEN
./pkg/obcs/obcs_balance_flow.F 289 OBCS_BALANCE_FLOW
        IF ( debugLevel.GE.debLevC ) THEN
./pkg/obcs/obcs_balance_flow.F 302 OBCS_BALANCE_FLOW
      IF ( debugLevel.GE.debLevC  .AND. areaOB.GT.0. ) THEN
./pkg/obcs/obcs_check.F 117 OBCS_CHECK
      IF ( debugLevel.GE.debLevA ) THEN
./pkg/obcs/obcs_diag_balance.F 186 OBCS_DIAG_BALANCE
        IF ( debugLevel.GE.debLevC ) THEN
./pkg/obcs/obcs_fields_load.F 111 OBCS_FIELDS_LOAD
      IF ( debugLevel.GE.debLevB ) THEN
./pkg/obcs/obcs_fields_load.F 138 OBCS_FIELDS_LOAD
       IF ( debugLevel.GE.debLevZero ) THEN
./pkg/obcs/obcs_readparms.F 284 OBCS_READPARMS
      OBCSprintDiags     = debugLevel.GE.debLevC
./pkg/obcs/obcs_readparms.F 535 OBCS_READPARMS
      IF ( debugLevel.GE.debLevA ) THEN
./pkg/obcs/obcs_set_connect.F 173 OBCS_SET_CONNECT
      prtMsg = prtMsg*debugLevel
./pkg/ocn_compon_interf/ocn_check_cplconfig.F 52 OCN_CHECK_CPLCONFIG
      IF ( debugLevel.GE.debLevB ) THEN
./pkg/offline/offline_fields_load.F 132 OFFLINE_FIELDS_LOAD
       IF ( debugLevel.GE.debLevZero ) THEN
./pkg/offline/offline_fields_load.F 99 OFFLINE_FIELDS_LOAD
      IF ( debugLevel.GE.debLevB ) THEN
./pkg/profiles/cost_profiles.F 521 COST_PROFILES
      IF ( debugLevel .GE. debLevD ) THEN
./pkg/profiles/cost_profiles.F 589 COST_PROFILES
      IF ( debugLevel .GE. debLevD ) THEN
./pkg/profiles/profiles_readvector.F 66 PROFILES_READVECTOR
      IF ( debugLevel .GE. debLevD ) THEN
./model/src/dynamics.F 703 DYNAMICS
      IF ( debugLevel .GE. debLevD ) THEN
./model/src/dynamics.F 725 DYNAMICS
      IF ( debugLevel .GE. debLevE ) THEN
./model/src/external_fields_load.F 108 EXTERNAL_FIELDS_LOAD
        IF ( debugLevel.GE.debLevZero ) THEN
./model/src/external_fields_load.F 324 EXTERNAL_FIELDS_LOAD
      IF ( debugLevel.GE.debLevC ) THEN
./model/src/external_fields_load.F 80 EXTERNAL_FIELDS_LOAD
      IF ( debugLevel.GE.debLevB ) THEN
./pkg/rbcs/rbcs_fields_load.F 114 RBCS_FIELDS_LOAD
       IF ( debugLevel.GE.debLevZero ) THEN
./pkg/rbcs/rbcs_fields_load.F 82 RBCS_FIELDS_LOAD
       IF ( debugLevel.GE.debLevB ) THEN
./pkg/rbcs/rbcs_init_fixed.F 250 RBCS_INIT_FIXED
         IF ( debugLevel.GE.debLevC ) THEN
./pkg/rbcs/rbcs_init_fixed.F 310 RBCS_INIT_FIXED
         IF ( debugLevel.GE.debLevC ) THEN
./pkg/rw/read_mflds.F 189 READ_MFLDS_SET
      IF ( debugLevel.GE.debLevA ) THEN
./pkg/rw/read_mflds.F 304 READ_MFLDS_3D_RL
      prtMsg = debugLevel.GE.debLevA .AND. myThid.EQ.1
./pkg/rw/read_mflds.F 433 READ_MFLDS_LEV_RL
      prtMsg = debugLevel.GE.debLevA .AND. myThid.EQ.1
./pkg/rw/read_mflds.F 562 READ_MFLDS_LEV_RS
      prtMsg = debugLevel.GE.debLevA .AND. myThid.EQ.1
./pkg/rw/read_mflds.F 732 READ_MFLDS_CHECK
        prtMsg = debugLevel.GE.debLevA .AND. myThid.EQ.1
./model/src/find_hyd_press_1d.F 137 FIND_HYD_PRESS_1D
        IF ( debugLevel.GE.debLevB ) THEN
./pkg/seaice/lsr.F 1190 LSR
      IF ( debugLevel .GE. debLevC ) THEN
./pkg/seaice/lsr.F 666 LSR
      IF ( debugLevel .GE. debLevD ) THEN
./pkg/seaice/lsr.F 941 LSR
      IF ( debugLevel .GE. debLevC ) THEN
./pkg/seaice/seaice_advection.F 185 SEAICE_ADVECTION
      dBug = debugLevel.GE.debLevC
./pkg/seaice/seaice_advection.F 756 SEAICE_ADVECTION
      IF ( debugLevel .GE. debLevC
./pkg/seaice/seaice_do_ridging.F 440 SEAICE_DO_RIDGING
      IF ( doRidgeAgain .AND. debugLevel .GE. debLevA ) THEN
./pkg/seaice/seaice_evp.F 182 SEAICE_EVP
      printResidual = debugLevel.GE.debLevA
./pkg/seaice/seaice_itd_remap.F 194 SEAICE_ITD_REMAP
      IF ( debugLevel.GE.debLevA )
./pkg/seaice/seaice_jfnk.F 131 SEAICE_JFNK
      IF ( debugLevel.GE.debLevC .AND.
./pkg/seaice/seaice_jfnk.F 300 SEAICE_JFNK
        IF ( debugLevel.GE.debLevA ) THEN
./pkg/seaice/seaice_jfnk.F 437 SEAICE_JFNK
      IF ( debugLevel.GE.debLevA ) THEN
./pkg/seaice/seaice_jfnk.F 582 SEAICE_JFNK_UPDATE
       IF ( debugLevel.GE.debLevA .AND. doLineSearch ) THEN
./pkg/seaice/seaice_krylov.F 130 SEAICE_KRYLOV
      IF ( debugLevel.GE.debLevC .AND. 
./pkg/seaice/seaice_krylov.F 376 SEAICE_KRYLOV
        IF ( debugLevel.GE.debLevA
./pkg/seaice/seaice_krylov.F 493 SEAICE_KRYLOV
      IF ( debugLevel.GE.debLevA 
./pkg/seaice/seaice_lsr.F 159 SEAICE_LSR
      printResidual = debugLevel.GE.debLevA
./pkg/seaice/seaice_lsr.F 527 SEAICE_LSR
      IF ( debugLevel .GE. debLevD ) THEN
./pkg/seaice/seaice_lsr.F 898 SEAICE_LSR
      IF ( debugLevel .GE. debLevD ) THEN
./pkg/seaice/seaice_lsr.F 934 SEAICE_LSR
      IF ( debugLevel .GE. debLevC ) THEN
./model/src/ini_cg3d.F 330 INI_CG3D
      IF ( debugLevel .GE. debLevC ) THEN
./pkg/seaice/seaice_preconditioner.F 127 SEAICE_PRECONDITIONER
      printResidual = debugLevel.GE.debLevC
./pkg/seaice/seaice_preconditioner.F 218 SEAICE_PRECONDITIONER
      IF ( debugLevel .GE. debLevD ) THEN
./pkg/seaice/seaice_preconditioner.F 405 SEAICE_PRECONDITIONER
      IF ( debugLevel .GE. debLevD ) THEN
./pkg/shelfice/shelfice_init_fixed.F 189 SHELFICE_INIT_FIXED
      IF ( debugLevel.GE.debLevC ) THEN
./pkg/thsice/thsice_advdiff.F 133 THSICE_ADVDIFF
      dBugFlag = debugLevel.GE.debLevC
./pkg/thsice/thsice_advection.F 167 THSICE_ADVECTION
      dBugFlag = debugLevel.GE.debLevC
./pkg/thsice/thsice_advection.F 761 THSICE_ADVECTION
      IF ( debugLevel .GE. debLevC
./pkg/thsice/thsice_diffusion.F 71 THSICE_DIFFUSION
      dBugFlag = debugLevel.GE.debLevC
./pkg/thsice/thsice_get_exf.F 172 THSICE_GET_EXF
      dBugFlag = debugLevel.GE.debLevC
./pkg/thsice/thsice_impl_temp.F 75 THSICE_IMPL_TEMP
      dBugFlag = debugLevel.GE.debLevC
./pkg/thsice/thsice_step_fwd.F 128 THSICE_STEP_FWD
      dBugFlag = debugLevel.GE.debLevC
./pkg/thsice/thsice_step_temp.F 108 THSICE_STEP_TEMP
      dBugFlag = debugLevel.GE.debLevC
./model/src/ini_parms.F 226 INI_PARMS
     & usePickupBeforeC35, debugMode, debugLevel, plotLevel,
./model/src/ini_parms.F 669 INI_PARMS
      IF ( debugLevel.GE.debLevE ) printResidualFreq = 1
./model/src/ini_parms.F 670 INI_PARMS
      IF ( plotLevel.EQ.UNSET_I ) plotLevel = debugLevel
./verification/advect_xy/code/ini_salt.F 130 INI_SALT
      IF ( debugLevel.GE.debLevC ) THEN
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F 141 INI_DEPTHS
      IF ( debugLevel.GE.debLevC ) THEN
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F 273 INI_DEPTHS
      IF ( debugLevel.GE.debLevC ) THEN
./model/src/initialise_fixed.F 279 INITIALISE_FIXED
      IF ( debugLevel.GE.debLevA .OR. startTime.EQ.baseTime ) THEN
./model/src/set_defaults.F 238 SET_DEFAULTS
        debugLevel        = debLevD
./model/src/set_defaults.F 240 SET_DEFAULTS
        debugLevel        = debLevB
./model/src/set_defaults.F 242 SET_DEFAULTS
        debugLevel        = debLevA
./model/src/solve_for_pressure.F 106 SOLVE_FOR_PRESSURE
      IF ( myIter.EQ.1+nIter0 .AND. debugLevel .GE. debLevA ) THEN
./model/src/solve_for_pressure.F 258 SOLVE_FOR_PRESSURE
      IF ( debugLevel .GE. debLevD ) THEN
./model/src/solve_for_pressure.F 316 SOLVE_FOR_PRESSURE
      IF ( debugLevel .GE. debLevD ) THEN
./model/src/solve_for_pressure.F 325 SOLVE_FOR_PRESSURE
       IF ( debugLevel .GE. debLevA ) THEN
./model/src/solve_for_pressure.F 397 SOLVE_FOR_PRESSURE
       IF ( debugLevel .GE. debLevD ) THEN
./model/src/solve_for_pressure.F 428 SOLVE_FOR_PRESSURE
        IF ( debugLevel .GE. debLevA ) THEN
./model/src/thermodynamics.F 392 THERMODYNAMICS
      IF ( debugLevel.GE.debLevD ) THEN
./model/src/write_grid.F 104 WRITE_GRID
        IF ( debugLevel.GE.debLevC ) THEN
./pkg/atm_compon_interf/atm_check_cplconfig.F 55 ATM_CHECK_CPLCONFIG
      IF ( debugLevel.GE.debLevB ) THEN
./pkg/atm_phys/atm_phys_init_fixed.F 97 ATM_PHYS_INIT_FIXED
     I         debugLevel, debugMode,
./pkg/autodiff/adread_adwrite.F 174 ADREAD
      IF ( debugLevel.GE.debLevC ) THEN
./pkg/autodiff/adread_adwrite.F 373 ADWRITE
      IF ( debugLevel .GE. debLevC ) THEN
./pkg/autodiff/autodiff_inadmode_set_ad.F 55 ADAUTODIFF_INADMODE_SET
      IF ( debugLevel.GE.debLevC ) THEN
./pkg/autodiff/autodiff_inadmode_unset_ad.F 55 ADAUTODIFF_INADMODE_UNSET
      IF ( debugLevel.GE.debLevC ) THEN
./pkg/bling/bling_fields_load.F 67 BLING_FIELDS_LOAD
       IF ( debugLevel.GE.debLevB ) THEN
./pkg/bling/bling_fields_load.F 93 BLING_FIELDS_LOAD
        IF ( debugLevel.GE.debLevZero ) THEN
./pkg/bulk_force/bulkf_fields_load.F 180 BULKF_FIELDS_LOAD
      IF ( debugLevel.GE.debLevB ) THEN
./pkg/bulk_force/bulkf_fields_load.F 198 BULKF_FIELDS_LOAD
       IF ( debugLevel.GE.debLevZero ) THEN
./pkg/cfc/cfc_fields_load.F 110 CFC_FIELDS_LOAD
        IF ( debugLevel.GE.debLevZero ) THEN
./pkg/cfc/cfc_fields_load.F 85 CFC_FIELDS_LOAD
       IF ( debugLevel.GE.debLevB ) THEN
./pkg/cfc/cfc_readparms.F 104 CFC_READPARMS
      IF ( debugLevel.GE.debLevB ) CFC_monFreq = PTRACERS_monitorFreq
./pkg/cheapaml/cheapaml.F 104 CHEAPAML
        writeDbug = debugLevel.GE.debLevC .AND. diagFreq.GT.0.
./pkg/cheapaml/cheapaml_init_fixed.F 258 CHEAPAML_INIT_FIXED
      IF ( debugLevel.GE.debLevB .AND. nIter0.EQ.0 ) THEN
./pkg/cheapaml/cheapaml_init_fixed.F 261 CHEAPAML_INIT_FIXED
      IF ( debugLevel.GE.debLevC .AND. nIter0.EQ.0 ) THEN
./pkg/cheapaml/cheapaml_init_varia.F 242 CHEAPAML_INIT_VARIA
      IF ( debugLevel.GE.debLevB .AND. nIter0.EQ.0 ) THEN
./pkg/ctrl/ctrl_init_rec.F 117 CTRL_INIT_REC
      if ( debugLevel .GE. debLevB ) then
./pkg/ctrl/ctrl_init_rec.F 73 CTRL_INIT_REC
      if ( debugLevel .GE. debLevB ) then
./pkg/diagnostics/diag_cg2d.F 210 DIAG_CG2D
      IF ( debugLevel .GE. debLevZero ) THEN
./pkg/diagnostics/diagnostics_calc_phivel.F 223 DIAGNOSTICS_CALC_PHIVEL
        IF ( debugLevel.GE.debLevA .AND. k.EQ.1 ) THEN
./pkg/diagnostics/diagnostics_calc_phivel.F 240 DIAGNOSTICS_CALC_PHIVEL
        IF ( debugLevel.GE.debLevA ) THEN
./pkg/diagnostics/diagnostics_out.F 206 DIAGNOSTICS_OUT
            IF ( debugLevel.GE.debLevB .AND. myThid.EQ.1 ) THEN
./pkg/diagnostics/diagnostics_out.F 258 DIAGNOSTICS_OUT
            IF ( debugLevel.GE.debLevB .AND. myThid.EQ.1 ) THEN
./pkg/diagnostics/diagnostics_set_levels.F 186 DIAGNOSTICS_SET_LEVELS
      IF ( debugLevel.GE.debLevA .AND. myProcId.EQ.0 ) THEN
./pkg/diagnostics/diagnostics_summary.F 50 DIAGNOSTICS_SUMMARY
      IF ( debugLevel.GE.debLevB ) THEN
./pkg/diagnostics/diagnostics_summary.F 73 DIAGNOSTICS_SUMMARY
      IF ( outpSummary .AND. debugLevel.GE.debLevB ) THEN
./pkg/diagnostics/diagnostics_switch_onoff.F 173 DIAGNOSTICS_SWITCH_ONOFF
        dBugFlag = debugLevel.GE.debLevE
./pkg/diagnostics/diagnostics_switch_onoff.F 65 DIAGNOSTICS_SWITCH_ONOFF
      dBugFlag = debugLevel.GE.debLevE .AND. myThid.EQ.1
./pkg/diagnostics/diagnostics_write.F 144 DIAGNOSTICS_WRITE
          IF ( debugLevel.GE.debLevC ) THEN
./pkg/diagnostics/diagstats_output.F 118 DIAGSTATS_OUTPUT
            IF ( debugLevel .GE. debLevB ) THEN
./pkg/dic/dic_fields_load.F 55 DIC_FIELDS_LOAD
       IF ( debugLevel.GE.debLevB ) THEN
./pkg/dic/dic_fields_load.F 80 DIC_FIELDS_LOAD
        IF ( debugLevel.GE.debLevZero ) THEN
./pkg/down_slope/dwnslp_init_fixed.F 286 DWNSLP_INIT_FIXED
      IF ( debugLevel.GE.debLevA ) THEN
./pkg/down_slope/dwnslp_init_fixed.F 331 DWNSLP_INIT_FIXED
      IF ( DWNSLP_ioUnit.GT.0 .AND. debugLevel.LT.debLevD ) THEN
./pkg/ecco/cost_gencost_all.F 59 COST_GENCOST_ALL
         IF ( debugLevel .GE. debLevD ) THEN