Symbol Description Uses
DEBUG_CALL 283



File Line number Procedure Code
./pkg/exf/exf_init_fixed.F 128 EXF_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START uwind',myThid)
./pkg/exf/exf_init_fixed.F 138 EXF_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START vwind',myThid)
./pkg/exf/exf_init_fixed.F 150 EXF_INIT_FIXED
       IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START wspeed',myThid)
./pkg/exf/exf_init_fixed.F 163 EXF_INIT_FIXED
     &     CALL DEBUG_CALL('GETFFIELD_START ustress',myThid)
./pkg/exf/exf_init_fixed.F 174 EXF_INIT_FIXED
     &     CALL DEBUG_CALL('GETFFIELD_START vstress',myThid)
./pkg/exf/exf_init_fixed.F 186 EXF_INIT_FIXED
       IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START hflux',myThid)
./pkg/exf/exf_init_fixed.F 196 EXF_INIT_FIXED
       IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START sflux',myThid)
./pkg/exf/exf_init_fixed.F 208 EXF_INIT_FIXED
       IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START swflux',myThid)
./pkg/exf/exf_init_fixed.F 221 EXF_INIT_FIXED
       IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START atemp',myThid)
./pkg/exf/exf_init_fixed.F 231 EXF_INIT_FIXED
       IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START aqh',myThid)
./pkg/exf/exf_init_fixed.F 242 EXF_INIT_FIXED
       IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START hs ',myThid)
./pkg/exf/exf_init_fixed.F 252 EXF_INIT_FIXED
       IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START hl ',myThid)
./pkg/exf/exf_init_fixed.F 263 EXF_INIT_FIXED
       IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START lwflux',myThid)
./pkg/exf/exf_init_fixed.F 273 EXF_INIT_FIXED
       IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START precip',myThid)
./pkg/exf/exf_init_fixed.F 284 EXF_INIT_FIXED
     &    CALL DEBUG_CALL('GETFFIELD_START snowprecip',myThid)
./pkg/exf/exf_init_fixed.F 297 EXF_INIT_FIXED
       IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START evap',myThid)
./pkg/exf/exf_init_fixed.F 310 EXF_INIT_FIXED
       IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START runoff',myThid)
./pkg/exf/exf_init_fixed.F 324 EXF_INIT_FIXED
     &    CALL DEBUG_CALL('GETFFIELD_START saltflx',myThid)
./pkg/exf/exf_init_fixed.F 337 EXF_INIT_FIXED
       IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START swdown',myThid)
./pkg/exf/exf_init_fixed.F 347 EXF_INIT_FIXED
       IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START lwdown',myThid)
./pkg/exf/exf_init_fixed.F 361 EXF_INIT_FIXED
     &    CALL DEBUG_CALL('GETFFIELD_START apressure',myThid)
./pkg/exf/exf_init_fixed.F 375 EXF_INIT_FIXED
     &    CALL DEBUG_CALL('GETFFIELD_START tidePot',myThid)
./pkg/exf/exf_init_fixed.F 389 EXF_INIT_FIXED
     &    CALL DEBUG_CALL('GETFFIELD_START areamask',myThid)
./pkg/exf/exf_init_fixed.F 402 EXF_INIT_FIXED
       IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START obcsN',myThid)
./pkg/exf/exf_init_fixed.F 410 EXF_INIT_FIXED
       IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START obcsS',myThid)
./pkg/exf/exf_init_fixed.F 418 EXF_INIT_FIXED
       IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START obcsE',myThid)
./pkg/exf/exf_init_fixed.F 426 EXF_INIT_FIXED
       IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START obcsW',myThid)
./pkg/exf/exf_init_fixed.F 437 EXF_INIT_FIXED
       IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START siobN',myThid)
./pkg/exf/exf_init_fixed.F 445 EXF_INIT_FIXED
       IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START siobS',myThid)
./pkg/exf/exf_init_fixed.F 453 EXF_INIT_FIXED
       IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START siobE',myThid)
./pkg/exf/exf_init_fixed.F 461 EXF_INIT_FIXED
       IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START siobW',myThid)
./pkg/exf/exf_init_fixed.F 476 EXF_INIT_FIXED
     &    CALL DEBUG_CALL('GETFFIELD_START climsst',myThid)
./pkg/exf/exf_init_fixed.F 490 EXF_INIT_FIXED
     &    CALL DEBUG_CALL('GETFFIELD_START climsss',myThid)
./pkg/exf/exf_init_fixed.F 504 EXF_INIT_FIXED
     &    CALL DEBUG_CALL('GETFFIELD_START climustr',myThid)
./pkg/exf/exf_init_fixed.F 516 EXF_INIT_FIXED
     &    CALL DEBUG_CALL('GETFFIELD_START climvstr',myThid)
./pkg/exf/exf_init_fixed.F 603 EXF_INIT_FIXED
       IF (debugMode) CALL DEBUG_CALL('EXF_ZENITHANGLE_TABLE',myThid)
./pkg/exf/exf_init_fixed.F 611 EXF_INIT_FIXED
      IF (debugMode) CALL DEBUG_CALL('EXF_SUMMARY',myThid)
./pkg/exf/exf_init_fixed.F 618 EXF_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('EXF_DIAGNOSTICS_INIT',myThid)
./pkg/flt/flt_main.F 108 FLT_MAIN
         IF (debugMode) CALL DEBUG_CALL('FLT_RUNGA*', myThid )
./pkg/flt/flt_main.F 127 FLT_MAIN
         IF (debugMode) CALL DEBUG_CALL('FLT_EXCH*', myThid )
./pkg/flt/flt_main.F 142 FLT_MAIN
           IF (debugMode) CALL DEBUG_CALL('FLT_UP', myThid )
./pkg/flt/flt_main.F 150 FLT_MAIN
         IF (debugMode) CALL DEBUG_CALL('FLT_DOWN', myThid )
./pkg/flt/flt_main.F 163 FLT_MAIN
           IF (debugMode) CALL DEBUG_CALL('FLT_TRAJ', myThid )
./pkg/gchem/gchem_forcing_sep.F 152 GCHEM_FORCING_SEP
          IF (debugMode) CALL DEBUG_CALL('DIC_BIOTIC_FORCING',myThid)
./pkg/gchem/gchem_forcing_sep.F 212 GCHEM_FORCING_SEP
          IF (debugMode) CALL DEBUG_CALL('DARWIN_NUT_SUPPLY',myThid)
./pkg/gchem/gchem_forcing_sep.F 231 GCHEM_FORCING_SEP
          IF (debugMode) CALL DEBUG_CALL('DARWIN_FORCING',myThid)
./pkg/gchem/gchem_forcing_sep.F 246 GCHEM_FORCING_SEP
          IF (debugMode) CALL DEBUG_CALL('OBCS_APPLY_PTRACER',myThid)
./pkg/gchem/gchem_forcing_sep.F 276 GCHEM_FORCING_SEP
       IF (debugMode) CALL DEBUG_CALL('DIC_ATMOS',myThid)
./pkg/gmredi/gmredi_do_exch.F 55 GMREDI_DO_EXCH
        IF (debugMode) CALL DEBUG_CALL('EXCH_UV(GM_PsiX,Y)',myThid)
./pkg/icefront/icefront_init_fixed.F 51 ICEFRONT_INIT_FIXED
       IF (debugMode) CALL DEBUG_CALL('GETFIELD_START SGRunOff',myThid)
./pkg/longstep/longstep_thermodynamics.F 228 LONGSTEP_THERMODYNAMICS
           IF (debugMode) CALL DEBUG_CALL('PTRACERS_INTEGRATE',myThid)
./pkg/obcs/obcs_calc.F 406 OBCS_CALC
        IF (debugMode) CALL DEBUG_CALL('OBCS_PRESCRIBE_READ',myThid)
./pkg/obcs/obcs_calc.F 421 OBCS_CALC
       IF (debugMode) CALL DEBUG_CALL('OBCS_CALC_STEVENS',myThid)
./pkg/obcs/obcs_init_variables.F 350 OBCS_INIT_VARIABLES
          IF (debugMode) CALL DEBUG_CALL('ORLANSKI_INIT',myThid)
./pkg/obcs/obcs_init_variables.F 424 OBCS_INIT_VARIABLES
       IF (debugMode) CALL DEBUG_CALL('OBCS_CALC',myThid)
./pkg/obcs/obcs_init_variables.F 433 OBCS_INIT_VARIABLES
     &    CALL DEBUG_CALL('OBCS_APPLY_UV + OBCS_APPLY_TS',myThid)
./pkg/obcs/obcs_init_variables.F 447 OBCS_INIT_VARIABLES
     &    CALL DEBUG_CALL('EXCHANGES in OBCS_INIT_VARIABLES',myThid)
./pkg/obcs/obcs_init_variables.F 476 OBCS_INIT_VARIABLES
        IF (debugMode) CALL DEBUG_CALL('OBCS_APPLY_PTRACER',myThid)
./pkg/obcs/obcs_init_variables.F 495 OBCS_INIT_VARIABLES
         IF (debugMode) CALL DEBUG_CALL(
./pkg/openad/inner_do_loop.F 226 INNER_DO_LOOP
      IF (debugMode) CALL DEBUG_CALL('FORWARD_STEP',myThid)
./model/src/do_atmospheric_phys.F 144 DO_ATMOSPHERIC_PHYS
        IF (debugMode) CALL DEBUG_CALL('AIM_DO_PHYSICS',myThid)
./pkg/openad/the_model_main.F 359 THE_MODEL_MAIN
      IF (debugMode) CALL DEBUG_CALL('INITIALISE_FIXED',myThid)
./pkg/openad/the_model_main.F 401 THE_MODEL_MAIN
      IF (debugMode) CALL DEBUG_CALL('G_THE_MAIN_LOOP',myThid)
./pkg/openad/the_model_main.F 415 THE_MODEL_MAIN
         IF (debugMode) CALL DEBUG_CALL('MDTHE_MAIN_LOOP',myThid)
./pkg/openad/the_model_main.F 423 THE_MODEL_MAIN
         IF (debugMode) CALL DEBUG_CALL('ADTHE_MAIN_LOOP',myThid)
./pkg/openad/the_model_main.F 434 THE_MODEL_MAIN
      IF (debugMode) CALL DEBUG_CALL('ADTHE_MAIN_LOOP',myThid)
./pkg/openad/the_model_main.F 442 THE_MODEL_MAIN
      IF (debugMode) CALL DEBUG_CALL('THE_MAIN_LOOP',myThid)
./pkg/openad/the_model_main.F 591 THE_MODEL_MAIN
      IF (debugMode) CALL DEBUG_CALL('THE_MAIN_LOOP',myThid)
./pkg/openad/the_model_main.F 634 THE_MODEL_MAIN
      IF (debugMode) CALL DEBUG_CALL('THE_MAIN_LOOP',myThid)
./model/src/do_oceanic_phys.F 1017 DO_OCEANIC_PHYS
          IF (debugMode) CALL DEBUG_CALL('PP81_CALC',myThid)
./model/src/do_oceanic_phys.F 1028 DO_OCEANIC_PHYS
          IF (debugMode) CALL DEBUG_CALL('KL10_CALC',myThid)
./model/src/do_oceanic_phys.F 1039 DO_OCEANIC_PHYS
          IF (debugMode) CALL DEBUG_CALL('MY82_CALC',myThid)
./model/src/do_oceanic_phys.F 1054 DO_OCEANIC_PHYS
          IF (debugMode) CALL DEBUG_CALL('GGL90_CALC',myThid)
./model/src/do_oceanic_phys.F 1092 DO_OCEANIC_PHYS
          IF (debugMode) CALL DEBUG_CALL('GMREDI_CALC_TENSOR',myThid)
./model/src/do_oceanic_phys.F 1135 DO_OCEANIC_PHYS
        IF (debugMode) CALL DEBUG_CALL('OFFLINE_GET_DIFFUS',myThid)
./model/src/do_oceanic_phys.F 271 DO_OCEANIC_PHYS
       IF (debugMode) CALL DEBUG_CALL('OBCS_CALC',myThid)
./model/src/do_oceanic_phys.F 359 DO_OCEANIC_PHYS
        IF (debugMode) CALL DEBUG_CALL('THSICE_MAIN',myThid)
./model/src/do_oceanic_phys.F 473 DO_OCEANIC_PHYS
        IF (debugMode) CALL DEBUG_CALL('SEAICE_MODEL',myThid)
./model/src/do_oceanic_phys.F 489 DO_OCEANIC_PHYS
        IF (debugMode) CALL DEBUG_CALL('OCN_EXPORT_DATA',myThid)
./model/src/do_oceanic_phys.F 525 DO_OCEANIC_PHYS
        IF (debugMode) CALL DEBUG_CALL('THSICE_MAIN',myThid)
./model/src/do_oceanic_phys.F 539 DO_OCEANIC_PHYS
       IF (debugMode) CALL DEBUG_CALL('SHELFICE_THERMODYNAMICS',myThid)
./model/src/do_oceanic_phys.F 560 DO_OCEANIC_PHYS
       IF (debugMode) CALL DEBUG_CALL('ICEFRONT_THERMODYNAMICS',myThid)
./model/src/do_oceanic_phys.F 604 DO_OCEANIC_PHYS
      IF (debugMode) CALL DEBUG_CALL('EXTERNAL_FORCING_SURF',myThid)
./model/src/do_oceanic_phys.F 761 DO_OCEANIC_PHYS
        IF (debugMode) CALL DEBUG_CALL('FIND_RHO_2D (xNr)',myThid)
./model/src/do_oceanic_phys.F 872 DO_OCEANIC_PHYS
            IF (debugMode) CALL DEBUG_CALL('GRAD_SIGMA',myThid)
./model/src/do_oceanic_phys.F 908 DO_OCEANIC_PHYS
            IF (debugMode) CALL DEBUG_CALL('CALC_IVDC',myThid)
./model/src/do_oceanic_phys.F 999 DO_OCEANIC_PHYS
          IF (debugMode) CALL DEBUG_CALL('KPP_CALC',myThid)
./pkg/ptracers/ptracers_integrate.F 235 PTRACERS_INTEGRATE
         IF (debugMode) CALL DEBUG_CALL('GAD_SOM_ADVECT',myThid)
./pkg/ptracers/ptracers_integrate.F 252 PTRACERS_INTEGRATE
          IF (debugMode) CALL DEBUG_CALL('GAD_ADVECTION',myThid)
./model/src/dynamics.F 651 DYNAMICS
         IF (debugMode) CALL DEBUG_CALL('CALC_GW', myThid )
./model/src/forward_step.F 1015 FORWARD_STEP
     &   CALL DEBUG_CALL('DO_STAGGER_FIELDS_EXCH.',myThid)
./model/src/forward_step.F 1034 FORWARD_STEP
        IF (debugMode) CALL DEBUG_CALL('THERMODYNAMICS',myThid)
./model/src/forward_step.F 1062 FORWARD_STEP
        IF (debugMode) CALL DEBUG_CALL('LONGSTEP_AVERAGE',myThid)
./model/src/forward_step.F 1072 FORWARD_STEP
     &    CALL DEBUG_CALL('LONGSTEP_THERMODYNAMICS',myThid)
./model/src/forward_step.F 1105 FORWARD_STEP
        IF (debugMode) CALL DEBUG_CALL('GCHEM_FORCING_SEP',myThid)
./model/src/forward_step.F 492 FORWARD_STEP
      IF (debugMode) CALL DEBUG_CALL('LOAD_FIELDS_DRIVER',myThid)
./model/src/forward_step.F 509 FORWARD_STEP
        IF (debugMode) CALL DEBUG_CALL('BULKF_FORCING',myThid)
./model/src/forward_step.F 522 FORWARD_STEP
        IF (debugMode) CALL DEBUG_CALL('CHEAPAML',myThid)
./model/src/forward_step.F 567 FORWARD_STEP
        IF (debugMode) CALL DEBUG_CALL('EBM',myThid)
./model/src/forward_step.F 578 FORWARD_STEP
      IF (debugMode) CALL DEBUG_CALL('DO_ATMOSPHERIC_PHYS',myThid)
./model/src/forward_step.F 613 FORWARD_STEP
       IF (debugMode) CALL DEBUG_CALL('DO_OCEANIC_PHYS',myThid)
./model/src/forward_step.F 661 FORWARD_STEP
        IF (debugMode) CALL DEBUG_CALL('GCHEM_CALC_TENDENCY',myThid)
./model/src/forward_step.F 733 FORWARD_STEP
        IF (debugMode) CALL DEBUG_CALL('LONGSTEP_AVERAGE',myThid)
./model/src/forward_step.F 741 FORWARD_STEP
     &    CALL DEBUG_CALL('LONGSTEP_THERMODYNAMICS',myThid)
./model/src/forward_step.F 756 FORWARD_STEP
        IF (debugMode) CALL DEBUG_CALL('THERMODYNAMICS',myThid)
./model/src/forward_step.F 770 FORWARD_STEP
        IF (debugMode) CALL DEBUG_CALL('LONGSTEP_AVERAGE',myThid)
./model/src/forward_step.F 778 FORWARD_STEP
     &    CALL DEBUG_CALL('LONGSTEP_THERMODYNAMICS',myThid)
./model/src/forward_step.F 812 FORWARD_STEP
        IF (debugMode) CALL DEBUG_CALL('DYNAMICS',myThid)
./model/src/forward_step.F 844 FORWARD_STEP
        IF (debugMode) CALL DEBUG_CALL('OFFLINE_FIELDS_LOAD',myThid)
./pkg/seaice/seaice_model.F 144 SEAICE_MODEL
      IF (debugMode) CALL DEBUG_CALL( 'SEAICE_DYNSOLVER', myThid )
./pkg/seaice/seaice_model.F 167 SEAICE_MODEL
        IF (debugMode) CALL DEBUG_CALL( 'THSICE_DO_ADVECT', myThid )
./pkg/seaice/seaice_model.F 182 SEAICE_MODEL
       IF (debugMode) CALL DEBUG_CALL( 'SEAICE_ADVDIFF', myThid )
./pkg/seaice/seaice_model.F 202 SEAICE_MODEL
        IF (debugMode) CALL DEBUG_CALL( 'SEAICE_GROWTH', myThid )
./model/src/initialise_fixed.F 112 INITIALISE_FIXED
      IF (debugMode) CALL DEBUG_CALL('INI_PARMS',myThid)
./model/src/initialise_fixed.F 118 INITIALISE_FIXED
      IF (debugMode) CALL DEBUG_CALL('PACKAGES_BOOT',myThid)
./model/src/initialise_fixed.F 126 INITIALISE_FIXED
        IF (debugMode) CALL DEBUG_CALL('CPL_IMPORT_CPLPARMS',myThid)
./model/src/initialise_fixed.F 134 INITIALISE_FIXED
      IF (debugMode) CALL DEBUG_CALL('PACKAGES_READPARMS',myThid)
./model/src/initialise_fixed.F 141 INITIALISE_FIXED
      IF (debugMode) CALL DEBUG_CALL('SET_PARMS',myThid)
./model/src/initialise_fixed.F 147 INITIALISE_FIXED
      IF (debugMode) CALL DEBUG_CALL('INI_MODEL_IO',myThid)
./model/src/initialise_fixed.F 154 INITIALISE_FIXED
      IF (debugMode) CALL DEBUG_CALL('INI_GRID',myThid)
./model/src/initialise_fixed.F 164 INITIALISE_FIXED
      IF (debugMode) CALL DEBUG_CALL('LOAD_REF_FILES',myThid)
./model/src/initialise_fixed.F 170 INITIALISE_FIXED
      IF (debugMode) CALL DEBUG_CALL('INI_EOS',myThid)
./model/src/initialise_fixed.F 176 INITIALISE_FIXED
      IF (debugMode) CALL DEBUG_CALL('SET_REF_STATE',myThid)
./model/src/initialise_fixed.F 182 INITIALISE_FIXED
      IF (debugMode) CALL DEBUG_CALL('SET_GRID_FACTORS',myThid)
./model/src/initialise_fixed.F 188 INITIALISE_FIXED
      IF (debugMode) CALL DEBUG_CALL('INI_DEPTHS',myThid)
./model/src/initialise_fixed.F 199 INITIALISE_FIXED
      IF (debugMode) CALL DEBUG_CALL('INI_MASKS_ETC',myThid)
./model/src/initialise_fixed.F 212 INITIALISE_FIXED
      IF (debugMode) CALL DEBUG_CALL('PACKAGES_INIT_FIXED',myThid)
./model/src/initialise_fixed.F 218 INITIALISE_FIXED
      IF (debugMode) CALL DEBUG_CALL('INI_GLOBAL_DOMAIN',myThid)
./model/src/initialise_fixed.F 224 INITIALISE_FIXED
      IF (debugMode) CALL DEBUG_CALL('INI_LINEAR_PHISURF',myThid)
./model/src/initialise_fixed.F 234 INITIALISE_FIXED
      IF (debugMode) CALL DEBUG_CALL('INI_CORI',myThid)
./model/src/initialise_fixed.F 244 INITIALISE_FIXED
      IF (debugMode) CALL DEBUG_CALL('INI_CG2D',myThid)
./model/src/initialise_fixed.F 255 INITIALISE_FIXED
      IF (debugMode) CALL DEBUG_CALL('INI_CG3D',myThid)
./model/src/initialise_fixed.F 262 INITIALISE_FIXED
      IF (debugMode) CALL DEBUG_CALL('CONFIG_SUMMARY',myThid)
./model/src/initialise_fixed.F 268 INITIALISE_FIXED
      IF (debugMode) CALL DEBUG_CALL('PACKAGES_CHECK',myThid)
./model/src/initialise_fixed.F 274 INITIALISE_FIXED
      IF (debugMode) CALL DEBUG_CALL('CONFIG_CHECK',myThid)
./model/src/initialise_fixed.F 281 INITIALISE_FIXED
        IF (debugMode) CALL DEBUG_CALL('WRITE_GRID',myThid)
./model/src/initialise_fixed.F 291 INITIALISE_FIXED
        IF (debugMode) CALL DEBUG_CALL('CPL_EXCH_CONFIGS',myThid)
./model/src/initialise_varia.F 131 INITIALISE_VARIA
      IF (debugMode) CALL DEBUG_CALL('INI_DYNVARS',myThid)
./model/src/initialise_varia.F 148 INITIALISE_VARIA
      IF (debugMode) CALL DEBUG_CALL('INI_FIELDS',myThid)
./model/src/initialise_varia.F 154 INITIALISE_VARIA
      IF (debugMode) CALL DEBUG_CALL('INI_MIXING',myThid)
./model/src/initialise_varia.F 165 INITIALISE_VARIA
      IF (debugMode) CALL DEBUG_CALL('INI_FORCING',myThid)
./model/src/initialise_varia.F 176 INITIALISE_VARIA
      IF (debugMode) CALL DEBUG_CALL('PACKAGES_INIT_VARIABLES',myThid)
./model/src/initialise_varia.F 204 INITIALISE_VARIA
      IF (debugMode) CALL DEBUG_CALL('CONVECTIVE_ADJUSTMENT_INI',myThid)
./model/src/initialise_varia.F 245 INITIALISE_VARIA
      IF (debugMode) CALL DEBUG_CALL('INTEGR_CONTINUITY',myThid)
./model/src/initialise_varia.F 288 INITIALISE_VARIA
      IF (debugMode) CALL DEBUG_CALL('STATE_SUMMARY',myThid)
./model/src/initialise_varia.F 294 INITIALISE_VARIA
      IF (debugMode) CALL DEBUG_CALL('MONITOR',myThid)
./model/src/initialise_varia.F 302 INITIALISE_VARIA
      IF (debugMode) CALL DEBUG_CALL('DO_STATEVARS_TAVE',myThid)
./model/src/initialise_varia.F 310 INITIALISE_VARIA
      IF (debugMode) CALL DEBUG_CALL('DO_THE_MODEL_IO',myThid)
./model/src/integr_continuity.F 313 INTEGR_CONTINUITY
        IF (debugMode) CALL DEBUG_CALL('UPDATE_ETAH',myThid)
./model/src/load_fields_driver.F 134 LOAD_FIELDS_DRIVER
        IF (debugMode) CALL DEBUG_CALL('BULKF_FIELDS_LOAD',myThid)
./model/src/load_fields_driver.F 146 LOAD_FIELDS_DRIVER
        IF (debugMode) CALL DEBUG_CALL('EXF_GETFORCING',myThid)
./model/src/load_fields_driver.F 158 LOAD_FIELDS_DRIVER
        IF (debugMode) CALL DEBUG_CALL('CHEAPAML_FIELDS_LOAD',myThid)
./model/src/load_fields_driver.F 166 LOAD_FIELDS_DRIVER
        IF (debugMode) CALL DEBUG_CALL('EXTERNAL_FIELDS_LOAD',myThid)
./model/src/load_fields_driver.F 183 LOAD_FIELDS_DRIVER
        IF (debugMode) CALL DEBUG_CALL('GCHEM_FIELDS_LOAD',myThid)
./model/src/main_do_loop.F 176 MAIN_DO_LOOP
      IF (debugMode) CALL DEBUG_CALL('FORWARD_STEP',myThid)
./model/src/packages_init_fixed.F 146 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('RUNCLOCK_INIT',myThid)
./model/src/packages_init_fixed.F 156 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('CAL_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 166 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('DIAGNOSTICS_INIT_EARLY',myThid)
./model/src/packages_init_fixed.F 170 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('DIAGNOSTICS_MAIN_INIT',myThid)
./model/src/packages_init_fixed.F 179 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('GAD_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 188 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('MOM_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 197 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('CD_CODE_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 207 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('OBCS_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 217 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('SHAP_FILT_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 227 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('ZONAL_FILT_INIT',myThid)
./model/src/packages_init_fixed.F 237 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('EXF_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 246 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('CHEAPAML_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 255 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('OPPS_INIT',myThid)
./model/src/packages_init_fixed.F 265 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('PP81_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 275 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('KL10_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 285 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('MY82_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 295 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('GGL90_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 305 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('KPP_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 315 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('GMREDI_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 325 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('BBL_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 335 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('DWNSLP_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 347 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('SEAICE_COST_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 356 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('SMOOTH_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 367 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('ECCO_COST_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 376 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('PROFILES_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 388 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('FLT_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 397 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('LONGSTEP_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 406 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('PTRACERS_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 415 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('GCHEM_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 424 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('RBCS_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 433 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('FRAZIL_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 442 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('SEAICE_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 451 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('SALT_PLUME_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 460 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('SHELFICE_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 469 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('STREAMICE_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 482 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('ICEFRONT_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 491 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('THSICE_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 501 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('LAND_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 510 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('ATM2D_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 520 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('AIM_INITIALISE',myThid)
./model/src/packages_init_fixed.F 530 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('ATM_PHYS_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 540 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('FIZHI_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 550 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('GRIDALT_INITIALISE',myThid)
./model/src/packages_init_fixed.F 560 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('TIMEAVE_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 569 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('REGRID_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 578 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('LAYERS_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 587 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('CPL_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 597 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('OASIS_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 606 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('EMBED_FILES_INIT',myThid)
./model/src/packages_init_fixed.F 615 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('MYPACKAGE_INIT_FIXED',myThid)
./model/src/packages_init_fixed.F 626 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('CTRL_INIT',myThid)
./model/src/packages_init_fixed.F 635 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('CTRL_ADMTLM',myThid)
./model/src/packages_init_fixed.F 646 PACKAGES_INIT_FIXED
        IF (debugMode) CALL DEBUG_CALL('DIAGNOSTICS_INIT_FIXED',myThid)
./model/src/packages_init_variables.F 157 PACKAGES_INIT_VARIABLES
        IF (debugMode) CALL DEBUG_CALL('GAD_INIT_VARIA',myThid)
./model/src/packages_init_variables.F 169 PACKAGES_INIT_VARIABLES
        IF (debugMode) CALL DEBUG_CALL('CD_CODE_INI_VARS',myThid)
./model/src/packages_init_variables.F 179 PACKAGES_INIT_VARIABLES
       IF (debugMode) CALL DEBUG_CALL('PP81_INIT_VARIA',myThid)
./model/src/packages_init_variables.F 189 PACKAGES_INIT_VARIABLES
       IF (debugMode) CALL DEBUG_CALL('KL10_INIT_VARIA',myThid)
./model/src/packages_init_variables.F 206 PACKAGES_INIT_VARIABLES
      IF (debugMode) CALL DEBUG_CALL('GGL90_INIT_VARIA',myThid)
./model/src/packages_init_variables.F 216 PACKAGES_INIT_VARIABLES
       IF (debugMode) CALL DEBUG_CALL('KPP_INIT_VARIA',myThid)
./model/src/packages_init_variables.F 226 PACKAGES_INIT_VARIABLES
        IF (debugMode) CALL DEBUG_CALL('GMREDI_INIT_VARIA',myThid)
./model/src/packages_init_variables.F 247 PACKAGES_INIT_VARIABLES
       IF (debugMode) CALL DEBUG_CALL('EXF_INIT_VARIA',myThid)
./model/src/packages_init_variables.F 286 PACKAGES_INIT_VARIABLES
        IF (debugMode) CALL DEBUG_CALL('PTRACERS_INIT_VARIA',myThid)
./model/src/packages_init_variables.F 291 PACKAGES_INIT_VARIABLES
        IF (debugMode) CALL DEBUG_CALL('LONGSTEP_INIT_VARIA',myThid)
./model/src/packages_init_variables.F 315 PACKAGES_INIT_VARIABLES
        IF (debugMode) CALL DEBUG_CALL('MATRIX_INIT',myThid)
./model/src/packages_init_variables.F 324 PACKAGES_INIT_VARIABLES
        IF (debugMode) CALL DEBUG_CALL('FRAZIL_INIT_VARIA',myThid)
./model/src/packages_init_variables.F 334 PACKAGES_INIT_VARIABLES
       IF (debugMode) CALL DEBUG_CALL('SEAICE_INIT_VARIA',myThid)
./model/src/packages_init_variables.F 349 PACKAGES_INIT_VARIABLES
       IF (debugMode) CALL DEBUG_CALL('SHELFICE_INIT_VARIA',myThid)
./model/src/packages_init_variables.F 358 PACKAGES_INIT_VARIABLES
       IF (debugMode) CALL DEBUG_CALL('STREAMICE_INIT_VARIA',myThid)
./model/src/packages_init_variables.F 367 PACKAGES_INIT_VARIABLES
       IF (debugMode) CALL DEBUG_CALL('ICEFRONT_INIT_VARIA',myThid)
./model/src/packages_init_variables.F 376 PACKAGES_INIT_VARIABLES
        IF (debugMode) CALL DEBUG_CALL('THSICE_INI_VARS',myThid)
./model/src/packages_init_variables.F 385 PACKAGES_INIT_VARIABLES
        IF (debugMode) CALL DEBUG_CALL('LAND_INI_VARS',myThid)
./model/src/packages_init_variables.F 394 PACKAGES_INIT_VARIABLES
        IF (debugMode) CALL DEBUG_CALL('ATM2D_INIT_VARS',myThid)
./model/src/packages_init_variables.F 403 PACKAGES_INIT_VARIABLES
        IF (debugMode) CALL DEBUG_CALL('ATM_PHYS_INIT_VARIA',myThid)
./model/src/packages_init_variables.F 413 PACKAGES_INIT_VARIABLES
        IF (debugMode) CALL DEBUG_CALL('FIZHI_INIT_VARS',myThid)
./model/src/packages_init_variables.F 436 PACKAGES_INIT_VARIABLES
     &       CALL DEBUG_CALL('NEST_CHILD_INIT_VARIA',myThid)
./model/src/packages_init_variables.F 447 PACKAGES_INIT_VARIABLES
     &       CALL DEBUG_CALL('NEST_PARENT_INIT',myThid)
./model/src/packages_init_variables.F 456 PACKAGES_INIT_VARIABLES
        IF (debugMode) CALL DEBUG_CALL('CPL_INI_VARS',myThid)
./model/src/packages_init_variables.F 499 PACKAGES_INIT_VARIABLES
        IF (debugMode) CALL DEBUG_CALL('CTRL_INIT_VARIABLES',myThid)
./model/src/packages_init_variables.F 509 PACKAGES_INIT_VARIABLES
        IF (debugMode) CALL DEBUG_CALL('OBCS_INIT_VARIABLES',myThid)
./model/src/salt_integrate.F 261 SALT_INTEGRATE
        IF (debugMode) CALL DEBUG_CALL('GAD_SOM_ADVECT',myThid)
./model/src/salt_integrate.F 275 SALT_INTEGRATE
        IF (debugMode) CALL DEBUG_CALL('GAD_ADVECTION',myThid)
./model/src/temp_integrate.F 269 TEMP_INTEGRATE
        IF (debugMode) CALL DEBUG_CALL('GAD_SOM_ADVECT',myThid)
./model/src/temp_integrate.F 283 TEMP_INTEGRATE
        IF (debugMode) CALL DEBUG_CALL('GAD_ADVECTION',myThid)
./model/src/the_main_loop.F 324 THE_MAIN_LOOP
      IF (debugMode) CALL DEBUG_CALL('INITIALISE_VARIA',myThid)
./model/src/the_main_loop.F 596 THE_MAIN_LOOP
        IF (debugMode) CALL DEBUG_CALL('cost_averagesfields',myThid)
./model/src/the_main_loop.F 608 THE_MAIN_LOOP
        IF (debugMode) CALL DEBUG_CALL('profiles_inloop',myThid)
./model/src/the_model_main.F 622 THE_MODEL_MAIN
      IF (debugMode) CALL DEBUG_CALL('INITIALISE_FIXED',myThid)
./model/src/the_model_main.F 661 THE_MODEL_MAIN
      IF (debugMode) CALL DEBUG_CALL('G_THE_MAIN_LOOP',myThid)
./model/src/the_model_main.F 675 THE_MODEL_MAIN
         IF (debugMode) CALL DEBUG_CALL('MDTHE_MAIN_LOOP',myThid)
./model/src/the_model_main.F 683 THE_MODEL_MAIN
         IF (debugMode) CALL DEBUG_CALL('ADTHE_MAIN_LOOP',myThid)
./model/src/the_model_main.F 693 THE_MODEL_MAIN
      IF (debugMode) CALL DEBUG_CALL('ADTHE_MAIN_LOOP',myThid)
./model/src/the_model_main.F 703 THE_MODEL_MAIN
      IF (debugMode) CALL DEBUG_CALL('THE_MAIN_LOOP',myThid)
./model/src/the_model_main.F 741 THE_MODEL_MAIN
      IF (debugMode) CALL DEBUG_CALL('THE_MAIN_LOOP',myThid)
./model/src/thermodynamics.F 317 THERMODYNAMICS
          IF (debugMode) CALL DEBUG_CALL('TEMP_INTEGRATE',myThid)
./model/src/thermodynamics.F 328 THERMODYNAMICS
          IF (debugMode) CALL DEBUG_CALL('SALT_INTEGRATE',myThid)
./model/src/thermodynamics.F 344 THERMODYNAMICS
          IF (debugMode) CALL DEBUG_CALL('PTRACERS_INTEGRATE',myThid)
./pkg/ctrl/ctrl_init_variables.F 383 CTRL_INIT_VARIABLES
      IF (debugMode) CALL DEBUG_CALL('CTRL_MAP_INI_ECCO',myThid)
./pkg/ctrl/ctrl_init_variables.F 388 CTRL_INIT_VARIABLES
      IF (debugMode) CALL DEBUG_CALL('CTRL_MAP_INI',myThid)
./pkg/debug/debug_call.F 6 DEBUG_CALL
      SUBROUTINE DEBUG_CALL(
./pkg/dic/dic_biotic_forcing.F 120 DIC_BIOTIC_FORCING
        IF (debugMode) CALL DEBUG_CALL('DIC_FIELDS_UPDATE',myThid)
./pkg/dic/dic_biotic_forcing.F 161 DIC_BIOTIC_FORCING
       IF (debugMode) CALL DEBUG_CALL('DIC_SURFFORCING',myThid)
./pkg/dic/dic_biotic_forcing.F 171 DIC_BIOTIC_FORCING
       IF (debugMode) CALL DEBUG_CALL('ALK_SURFFORCING',myThid)
./pkg/dic/dic_biotic_forcing.F 182 DIC_BIOTIC_FORCING
       IF (debugMode) CALL DEBUG_CALL('O2_SURFFORCING',myThid)
./pkg/dic/dic_biotic_forcing.F 194 DIC_BIOTIC_FORCING
       IF (debugMode) CALL DEBUG_CALL('FE_CHEM',myThid)
./pkg/dic/dic_biotic_forcing.F 204 DIC_BIOTIC_FORCING
       IF (debugMode) CALL DEBUG_CALL('BIO_EXPORT',myThid)
./pkg/dic/dic_biotic_forcing.F 217 DIC_BIOTIC_FORCING
       IF (debugMode) CALL DEBUG_CALL('PHOS_FLUX',myThid)
./pkg/dic/dic_biotic_forcing.F 243 DIC_BIOTIC_FORCING
          IF (debugMode) CALL DEBUG_CALL('CALCITE_SATURATION',myThid)
./pkg/dic/dic_biotic_forcing.F 252 DIC_BIOTIC_FORCING
        IF (debugMode) CALL DEBUG_CALL('CAR_FLUX_OMEGA_TOP',myThid)
./pkg/dic/dic_biotic_forcing.F 262 DIC_BIOTIC_FORCING
        IF (debugMode) CALL DEBUG_CALL('CAR_FLUX',myThid)
./pkg/dic/dic_biotic_forcing.F 375 DIC_BIOTIC_FORCING
       IF (debugMode) CALL DEBUG_CALL('FE_CHEM',myThid)
./pkg/ecco/cost_averagesfields.F 168 COST_AVERAGESFIELDS
      IF ( debugMode ) CALL DEBUG_CALL('cost_averagesflags',myThid)
./pkg/ecco/cost_averagesfields.F 198 COST_AVERAGESFIELDS
     &    CALL DEBUG_CALL('cost_averagesgeneric psbar',myThid)
./pkg/ecco/cost_averagesfields.F 253 COST_AVERAGESFIELDS
     &    CALL DEBUG_CALL('cost_averagesgeneric sigmaRbar',myThid)
./pkg/ecco/cost_averagesfields.F 270 COST_AVERAGESFIELDS
     &    CALL DEBUG_CALL('cost_averagesgeneric tbar',myThid)
./pkg/ecco/cost_averagesfields.F 292 COST_AVERAGESFIELDS
     &    CALL DEBUG_CALL('cost_averagesgeneric sstbar',myThid)
./pkg/ecco/cost_averagesfields.F 309 COST_AVERAGESFIELDS
     &    CALL DEBUG_CALL('cost_averagesgeneric sbar',myThid)
./pkg/ecco/cost_averagesfields.F 506 COST_AVERAGESFIELDS
     &    CALL DEBUG_CALL('cost_averagesgeneric hfluxmeanbar',myThid)
./pkg/ecco/cost_averagesfields.F 520 COST_AVERAGESFIELDS
     &    CALL DEBUG_CALL('cost_averagesgeneric sfluxmeanbar',myThid)
./pkg/ecco/cost_averagesfields.F 530 COST_AVERAGESFIELDS
     &    CALL DEBUG_CALL('cost_averagesgeneric sfluxmeanbar',myThid)
./pkg/ecco/cost_averagesfields.F 554 COST_AVERAGESFIELDS
     &    CALL DEBUG_CALL('cost_averagesgeneric smrareabar',myThid)
./pkg/ecco/cost_averagesfields.F 564 COST_AVERAGESFIELDS
     &    CALL DEBUG_CALL('cost_averagesgeneric smrsstbar',myThid)
./pkg/ecco/cost_averagesfields.F 575 COST_AVERAGESFIELDS
     &    CALL DEBUG_CALL('cost_averagesgeneric smrsssbar',myThid)
./pkg/ecco/ecco_cost_driver.F 113 ECCO_COST_DRIVER
      IF (debugMode) CALL DEBUG_CALL('cost_hyd',myThid)
./pkg/ecco/ecco_cost_driver.F 121 ECCO_COST_DRIVER
      IF (debugMode) CALL DEBUG_CALL('seaice_cost_driver',myThid)
./pkg/ecco/ecco_cost_driver.F 132 ECCO_COST_DRIVER
      IF (debugMode) CALL DEBUG_CALL('cost_obcs',myThid)
./pkg/ecco/ecco_cost_driver.F 218 ECCO_COST_DRIVER
      IF (debugMode) CALL DEBUG_CALL('ctrl_cost_driver',myThid)
./pkg/ecco/ecco_cost_driver.F 47 ECCO_COST_DRIVER
      IF (debugMode) CALL DEBUG_CALL('cost_forcing',myThid)
./pkg/ecco/ecco_cost_driver.F 74 ECCO_COST_DRIVER
      IF (debugMode) CALL DEBUG_CALL('cost_ssh',myThid)