Symbol Description Uses
useDiagnostics 160


File Line number Procedure Code
./pkg/fizhi/fizhi_init_fixed.F 78 FIZHI_INIT_FIXED 
       if ( useDiagnostics ) then
./pkg/fizhi/fizhi_wrapper.F 207 FIZHI_WRAPPER 
      if ( useDiagnostics ) then
./pkg/fizhi/fizhi_wrapper.F 233 FIZHI_WRAPPER 
      if ( useDiagnostics ) then
./pkg/fizhi/fizhi_wrapper.F 68 FIZHI_WRAPPER 
      if ( useDiagnostics ) then
./model/inc/PARAMS.h 952 NO PROCEDURE 
      LOGICAL useDiagnostics
./model/inc/PARAMS.h 969 NO PROCEDURE 
     &        useDiagnostics, useREGRID, useLayers, useMNC,
./pkg/gchem/gchem_init_fixed.F 60 GCHEM_INIT_FIXED 
      IF ( useDiagnostics ) THEN
./pkg/generic_advdiff/gad_advection.F 187 GAD_ADVECTION 
      IF ( useDiagnostics ) THEN
./pkg/generic_advdiff/gad_calc_rhs.F 154 GAD_CALC_RHS 
      IF ( useDiagnostics ) THEN
./pkg/generic_advdiff/gad_calc_rhs.F 265 GAD_CALC_RHS 
        IF ( useDiagnostics ) THEN
./pkg/generic_advdiff/gad_calc_rhs.F 317 GAD_CALC_RHS 
      IF ( useDiagnostics .AND.
./pkg/generic_advdiff/gad_calc_rhs.F 380 GAD_CALC_RHS 
        IF ( useDiagnostics ) THEN
./pkg/generic_advdiff/gad_calc_rhs.F 432 GAD_CALC_RHS 
      IF ( useDiagnostics .AND.
./pkg/generic_advdiff/gad_calc_rhs.F 498 GAD_CALC_RHS 
        IF ( useDiagnostics ) THEN
./pkg/generic_advdiff/gad_calc_rhs.F 554 GAD_CALC_RHS 
      IF ( useDiagnostics .AND.
./pkg/generic_advdiff/gad_calc_rhs.F 600 GAD_CALC_RHS 
       IF ( useDiagnostics ) THEN
./pkg/generic_advdiff/gad_implicit_r.F 297 GAD_IMPLICIT_R 
      IF ( useDiagnostics .AND. implicitDiffusion ) THEN
./pkg/generic_advdiff/gad_init_fixed.F 207 GAD_INIT_FIXED 
      IF ( useDiagnostics ) THEN
./pkg/generic_advdiff/gad_som_advect.F 165 GAD_SOM_ADVECT 
      IF ( useDiagnostics ) THEN
./pkg/generic_advdiff/salt_fill.F 112 SALT_FILL 
        IF ( useDiagnostics ) THEN
./pkg/generic_advdiff/salt_fill.F 74 SALT_FILL 
        IF (useDiagnostics)THEN
./pkg/ggl90/ggl90_calc.F 656 GGL90_CALC 
      IF ( useDiagnostics ) THEN
./pkg/ggl90/ggl90_init_fixed.F 41 GGL90_INIT_FIXED 
      IF ( useDiagnostics ) THEN
./pkg/gmredi/gmredi_calc_tensor.F 131 GMREDI_CALC_TENSOR 
      IF ( useDiagnostics ) THEN
./pkg/gmredi/gmredi_calc_tensor.F 520 GMREDI_CALC_TENSOR 
      IF ( useDiagnostics .AND. GM_taper_scheme.EQ.'fm07' ) THEN
./pkg/gmredi/gmredi_calc_tensor.F 945 GMREDI_CALC_TENSOR 
      IF ( useDiagnostics ) THEN
./pkg/gmredi/gmredi_diagnostics_fill.F 47 GMREDI_DIAGNOSTICS_FILL 
      IF ( useDiagnostics ) THEN
./pkg/gmredi/gmredi_init_fixed.F 43 GMREDI_INIT_FIXED 
      IF ( useDiagnostics ) THEN
./pkg/gmredi/gmredi_xtransport.F 192 GMREDI_XTRANSPORT 
      IF ( useDiagnostics
./pkg/gmredi/gmredi_ytransport.F 191 GMREDI_YTRANSPORT 
      IF ( useDiagnostics
./pkg/gridalt/gridalt_initialise.F 62 GRIDALT_INITIALISE 
      if ( useDiagnostics ) then
./pkg/gridalt/gridalt_update.F 69 GRIDALT_UPDATE 
       if(useDiagnostics) then
./pkg/icefront/icefront_init_fixed.F 89 ICEFRONT_INIT_FIXED 
      IF ( useDiagnostics ) THEN
./pkg/icefront/icefront_thermodynamics.F 184 ICEFRONT_THERMODYNAMICS 
         IF ( useDiagnostics ) THEN
./pkg/kpp/kpp_forcing_surf.F 233 KPP_FORCING_SURF 
      IF ( useDiagnostics ) THEN
./pkg/kpp/kpp_init_fixed.F 190 KPP_INIT_FIXED 
      IF ( useDiagnostics ) THEN
./pkg/kpp/kpp_output.F 359 KPP_OUTPUT 
      IF ( useDiagnostics .AND. myIter.NE.nIter0 ) THEN
./pkg/kpp/kpp_routines.F 1664 STATEKPP 
      IF ( useDiagnostics ) THEN
./pkg/kpp/kpp_routines.F 1828 KPP_DOUBLEDIFF 
       IF ( useDiagnostics ) THEN
./pkg/land/land_diagnostics_state.F 50 LAND_DIAGNOSTICS_STATE 
      IF ( useDiagnostics ) THEN
./pkg/land/land_do_diags.F 87 LAND_DO_DIAGS 
      IF ( useDiagnostics ) THEN
./pkg/land/land_initialise.F 67 LAND_INITIALISE 
      IF ( useDiagnostics ) CALL LAND_DIAGNOSTICS_INIT( myThid )
./pkg/longstep/longstep_average.F 183 LONGSTEP_AVERAGE 
       IF ( useDiagnostics ) THEN
./pkg/longstep/longstep_init_fixed.F 56 LONGSTEP_INIT_FIXED 
      IF ( useDiagnostics ) THEN
./pkg/mom_common/mom_calc_visc.F 615 MOM_CALC_VISC 
      IF (useDiagnostics) THEN
./pkg/mom_common/mom_init_fixed.F 165 MOM_INIT_FIXED 
      IF ( useDiagnostics ) THEN
./pkg/mom_common/mom_u_bottomdrag.F 100 MOM_U_BOTTOMDRAG 
      IF (useDiagnostics) THEN
./pkg/mom_common/mom_u_implicit_r.F 200 MOM_U_IMPLICIT_R 
      IF ( useDiagnostics .AND. implicitViscosity ) THEN
./pkg/mom_common/mom_u_sidedrag.F 160 MOM_U_SIDEDRAG 
      IF (useDiagnostics) THEN
./pkg/mom_common/mom_v_bottomdrag.F 107 MOM_V_BOTTOMDRAG 
      IF (useDiagnostics) THEN
./pkg/mom_common/mom_v_implicit_r.F 200 MOM_V_IMPLICIT_R 
      IF ( useDiagnostics .AND. implicitViscosity ) THEN
./pkg/mom_common/mom_v_sidedrag.F 147 MOM_V_SIDEDRAG 
      IF (useDiagnostics) THEN
./pkg/mom_common/mom_w_sidedrag.F 135 MOM_W_SIDEDRAG 
      IF (useDiagnostics) THEN
./pkg/mom_fluxform/mom_fluxform.F 296 MOM_FLUXFORM 
        IF ( useDiagnostics ) THEN
./pkg/mom_fluxform/mom_fluxform.F 421 MOM_FLUXFORM 
        IF ( useDiagnostics ) THEN
./pkg/mom_fluxform/mom_fluxform.F 505 MOM_FLUXFORM 
        IF ( useDiagnostics ) THEN
./pkg/mom_fluxform/mom_fluxform.F 637 MOM_FLUXFORM 
        IF ( useDiagnostics ) THEN
./pkg/mom_fluxform/mom_fluxform.F 720 MOM_FLUXFORM 
        IF ( useDiagnostics ) THEN
./pkg/mom_fluxform/mom_fluxform.F 818 MOM_FLUXFORM 
        IF ( useDiagnostics )
./pkg/mom_fluxform/mom_fluxform.F 828 MOM_FLUXFORM 
        IF ( useDiagnostics )
./pkg/mom_fluxform/mom_fluxform.F 863 MOM_FLUXFORM 
      IF ( useDiagnostics ) THEN
./pkg/mom_vecinv/mom_vecinv.F 291 MOM_VECINV 
       IF ( useDiagnostics ) THEN
./pkg/mom_vecinv/mom_vecinv.F 470 MOM_VECINV 
      IF ( useDiagnostics ) THEN
./pkg/mom_vecinv/mom_vecinv.F 524 MOM_VECINV 
       IF ( useDiagnostics ) THEN
./pkg/mom_vecinv/mom_vecinv.F 603 MOM_VECINV 
       IF ( useDiagnostics ) THEN
./pkg/mom_vecinv/mom_vecinv.F 624 MOM_VECINV 
        IF ( useDiagnostics ) THEN
./pkg/mom_vecinv/mom_vecinv.F 743 MOM_VECINV 
      IF ( useDiagnostics ) THEN
./model/src/calc_gw.F 113 CALC_GW 
      IF ( useDiagnostics ) THEN
./model/src/calc_gw.F 622 CALC_GW 
      IF (useDiagnostics) THEN
./model/src/calc_oce_mxlayer.F 216 CALC_OCE_MXLAYER 
       IF ( useDiagnostics ) THEN
./model/src/calc_oce_mxlayer.F 73 CALC_OCE_MXLAYER 
      IF ( useDiagnostics.AND. .NOT.calcMixLayerDepth ) THEN
./pkg/my82/my82_init_fixed.F 69 MY82_INIT_FIXED 
      IF ( useDiagnostics ) THEN
./pkg/my82/my82_output.F 226 MY82_OUTPUT 
      IF ( useDiagnostics ) THEN
./pkg/mypackage/mypackage_diagnostics_state.F 38 MYPACKAGE_DIAGNOSTICS_STATE 
      IF ( useDiagnostics ) THEN
./pkg/mypackage/mypackage_init_fixed.F 38 MYPACKAGE_INIT_FIXED 
      IF ( useDiagnostics ) THEN
./model/src/convective_adjustment.F 213 CONVECTIVE_ADJUSTMENT 
          IF ( myIter.NE.nIter0 .AND. useDiagnostics ) THEN
./pkg/ptracers/ptracers_forcing_surf.F 102 PTRACERS_FORCING_SURF 
        IF ( useDiagnostics ) THEN
./pkg/ptracers/ptracers_init_fixed.F 126 PTRACERS_INIT_FIXED 
      IF ( useDiagnostics ) THEN
./pkg/salt_plume/salt_plume_calc_depth.F 136 SALT_PLUME_CALC_DEPTH 
      IF ( useDiagnostics )
./pkg/salt_plume/salt_plume_diagnostics_fill.F 33 SALT_PLUME_DIAGNOSTICS_FILL 
      IF ( useDiagnostics ) THEN
./pkg/salt_plume/salt_plume_init_fixed.F 34 SALT_PLUME_INIT_FIXED 
      IF ( useDiagnostics ) THEN
./pkg/salt_plume/salt_plume_tendency_apply_s.F 71 SALT_PLUME_TENDENCY_APPLY_S 
       IF ( useDiagnostics ) THEN
./model/src/do_oceanic_phys.F 126 DO_OCEANIC_PHYS 
      IF ( useDiagnostics .AND. fluidIsWater ) THEN
./model/src/do_oceanic_phys.F 790 DO_OCEANIC_PHYS 
      IF ( fluidIsWater .AND. useDiagnostics ) THEN
./model/src/do_oceanic_phys.F 796 DO_OCEANIC_PHYS 
      IF ( ivdc_kappa.NE.0 .AND. useDiagnostics ) THEN
./pkg/seaice/dynsolver.F 485 DYNSOLVER 
      IF ( useDiagnostics ) THEN
./pkg/seaice/seaice_advection.F 166 SEAICE_ADVECTION 
      IF ( useDiagnostics ) THEN
./pkg/seaice/seaice_advection.F 715 SEAICE_ADVECTION 
        IF ( useDiagnostics ) THEN
./pkg/seaice/seaice_diagnostics_state.F 59 SEAICE_DIAGNOSTICS_STATE 
      IF ( useDiagnostics ) THEN
./pkg/seaice/seaice_diffusion.F 104 SEAICE_DIFFUSION 
        IF ( useDiagnostics .AND. diff1.NE.0. ) THEN
./pkg/seaice/seaice_diffusion.F 69 SEAICE_DIFFUSION 
       IF ( useDiagnostics ) THEN
./pkg/seaice/seaice_evp.F 280 SEAICE_EVP 
          IF ( useDiagnostics ) THEN
./model/src/do_the_model_io.F 211 DO_THE_MODEL_IO 
      IF ( useDiagnostics )
./pkg/seaice/seaice_growth.F 1091 SEAICE_GROWTH 
        IF ( useDiagnostics ) THEN
./pkg/seaice/seaice_growth.F 1273 SEAICE_GROWTH 
        IF ( useDiagnostics ) THEN
./pkg/seaice/seaice_growth.F 1303 SEAICE_GROWTH 
         IF ( useDiagnostics ) THEN
./pkg/seaice/seaice_growth.F 1395 SEAICE_GROWTH 
        IF ( useDiagnostics ) THEN
./pkg/seaice/seaice_growth.F 610 SEAICE_GROWTH 
        IF ( useDiagnostics ) THEN
./pkg/seaice/seaice_growth.F 757 SEAICE_GROWTH 
        IF ( useDiagnostics ) THEN
./pkg/seaice/seaice_growth.F 888 SEAICE_GROWTH 
        IF ( useDiagnostics ) THEN
./pkg/seaice/seaice_init_fixed.F 195 SEAICE_INIT_FIXED 
      IF ( useDiagnostics ) THEN
./pkg/seaice/seaice_model.F 281 SEAICE_MODEL 
       IF ( useDiagnostics ) THEN
./model/src/dynamics.F 255 DYNAMICS 
      IF ( useDiagnostics )
./model/src/dynamics.F 676 DYNAMICS 
      IF ( useDiagnostics ) THEN
./pkg/shap_filt/shap_filt_apply_ts.F 122 SHAP_FILT_APPLY_TS 
     &                         .AND. useDiagnostics ) THEN
./pkg/shap_filt/shap_filt_apply_ts.F 167 SHAP_FILT_APPLY_TS 
     &                         .AND. useDiagnostics ) THEN
./pkg/shap_filt/shap_filt_apply_uv.F 126 SHAP_FILT_APPLY_UV 
     &                         .AND. useDiagnostics ) THEN
./pkg/shap_filt/shap_filt_init_fixed.F 36 SHAP_FILT_INIT_FIXED 
      IF ( useDiagnostics ) THEN
./pkg/shelfice/shelfice_init_fixed.F 68 SHELFICE_INIT_FIXED 
      IF ( useDiagnostics ) THEN
./pkg/shelfice/shelfice_thermodynamics.F 301 SHELFICE_THERMODYNAMICS 
      IF ( useDiagnostics ) THEN
./model/src/external_forcing_surf.F 165 EXTERNAL_FORCING_SURF 
       IF ( useDiagnostics ) THEN
./pkg/shelfice/shelfice_u_drag.F 92 SHELFICE_U_DRAG 
      IF (useDiagnostics) THEN
./pkg/shelfice/shelfice_v_drag.F 92 SHELFICE_V_DRAG 
      IF (useDiagnostics) THEN
./model/src/forward_step.F 216 FORWARD_STEP 
      IF ( useDiagnostics ) THEN
./model/src/forward_step.F 888 FORWARD_STEP 
        IF ( useDiagnostics ) THEN
./model/src/forward_step.F 992 FORWARD_STEP 
      IF ( useDiagnostics ) THEN
./pkg/thsice/thsice_advdiff.F 293 THSICE_ADVDIFF 
        IF ( useDiagnostics ) THEN
./pkg/thsice/thsice_advdiff.F 342 THSICE_ADVDIFF 
        IF ( useDiagnostics ) THEN
./pkg/thsice/thsice_advdiff.F 399 THSICE_ADVDIFF 
        IF ( useDiagnostics ) THEN
./pkg/thsice/thsice_advdiff.F 510 THSICE_ADVDIFF 
      IF ( useDiagnostics ) THEN
./pkg/thsice/thsice_ave.F 136 THSICE_AVE 
      IF ( useDiagnostics ) THEN
./pkg/thsice/thsice_diagnostics_state.F 49 THSICE_DIAGNOSTICS_STATE 
      IF ( useDiagnostics ) THEN
./pkg/thsice/thsice_init_fixed.F 43 THSICE_INIT_FIXED 
      IF ( useDiagnostics ) THEN
./pkg/thsice/thsice_step_fwd.F 173 THSICE_STEP_FWD 
      IF ( useDiagnostics ) THEN
./model/src/impldiff.F 301 IMPLDIFF 
      IF ( useDiagnostics .AND.tracerId.NE.0 ) THEN
./verification/OpenAD/code_oad_all/gad_implicit_r.F 295 GAD_IMPLICIT_R 
      IF ( useDiagnostics .AND. implicitDiffusion ) THEN
./verification/OpenAD/code_oad_all/the_model_main.F 708 THE_MODEL_MAIN 
      IF (useDiagnostics) THEN
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F 390 AIM_SURF_BC 
      IF ( useDiagnostics ) THEN
./verification/fizhi-cs-aqualev20/code/fizhi_init_fixed.F 65 FIZHI_INIT_FIXED 
       if ( useDiagnostics ) then
./verification/offline_exf_seaice/code_ad/the_main_loop.F 407 THE_MAIN_LOOP 
      IF ( useDiagnostics ) THEN
./verification/offline_exf_seaice/code_ad/the_main_loop.F 478 THE_MAIN_LOOP 
      IF ( useDiagnostics ) THEN
./verification/offline_exf_seaice/code_ad/the_model_main.F 631 THE_MODEL_MAIN 
      IF (useDiagnostics) THEN
./model/src/packages_boot.F 141 PACKAGES_BOOT 
      useDiagnostics  =.FALSE.
./model/src/packages_boot.F 83 PACKAGES_BOOT 
     &          useDiagnostics,
./model/src/packages_check.F 305 PACKAGES_CHECK 
      IF (useDiagnostics) CALL DIAGNOSTICS_CHECK( myThid )
./model/src/packages_check.F 307 PACKAGES_CHECK 
      IF (useDiagnostics)
./model/src/packages_init_fixed.F 120 PACKAGES_INIT_FIXED 
      IF ( useDiagnostics ) THEN
./model/src/packages_init_fixed.F 350 PACKAGES_INIT_FIXED 
      IF ( useDiagnostics ) CALL DIAGNOSTICS_INIT_FIXED( myThid )
./model/src/packages_init_variables.F 120 PACKAGES_INIT_VARIABLES 
      IF ( useDiagnostics ) THEN
./verification/tutorial_global_oce_latlon/code/ptracers_forcing_surf.F 103 PTRACERS_FORCING_SURF 
        IF ( useDiagnostics ) THEN
./model/src/packages_readparms.F 322 PACKAGES_READPARMS 
      IF ( useDiagnostics ) CALL DIAGNOSTICS_READPARMS( myThid )
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F 148 EXTERNAL_FORCING_SURF 
       IF ( useDiagnostics ) THEN
./model/src/packages_write_pickup.F 128 PACKAGES_WRITE_PICKUP 
      IF (useDiagnostics) THEN
./verification/tutorial_tracer_adjsens/code_ad/ptracers_forcing_surf.F 102 PTRACERS_FORCING_SURF 
        IF ( useDiagnostics ) THEN
./model/src/timestep.F 416 TIMESTEP 
      IF ( useCDscheme .AND. useDiagnostics ) THEN
./model/src/timestep.F 90 TIMESTEP 
      externForcDiagIsOn = useDiagnostics .AND. momForcing
./model/src/turnoff_model_io.F 83 TURNOFF_MODEL_IO 
      useDiagnostics = .FALSE.
./pkg/aim_v23/aim_aim2dyn.F 79 AIM_AIM2DYN 
      IF (useDiagnostics) THEN
./pkg/aim_v23/aim_diagnostics.F 374 AIM_DIAGNOSTICS 
       IF (useDiagnostics) THEN
./pkg/aim_v23/aim_do_physics.F 143 AIM_DO_PHYSICS 
      CALL PHY_DRIVER( tYear, useDiagnostics,
./pkg/aim_v23/aim_initialise.F 130 AIM_INITIALISE 
      IF ( useDiagnostics ) THEN
./pkg/aim_v23/aim_surf_bc.F 371 AIM_SURF_BC 
      IF ( useDiagnostics ) THEN
./pkg/dic/dic_biotic_forcing.F 339 DIC_BIOTIC_FORCING 
      IF ( useDiagnostics ) THEN
./pkg/down_slope/dwnslp_apply.F 103 DWNSLP_APPLY 
       IF ( useDiagnostics ) THEN
./pkg/down_slope/dwnslp_calc_flow.F 79 DWNSLP_CALC_FLOW 
      IF ( useDiagnostics ) THEN
./pkg/down_slope/dwnslp_init_fixed.F 336 DWNSLP_INIT_FIXED 
      IF ( useDiagnostics ) THEN
./pkg/ecco/the_main_loop.F 467 THE_MAIN_LOOP 
      IF ( useDiagnostics ) THEN
./pkg/ecco/the_main_loop.F 980 THE_MAIN_LOOP 
      IF ( useDiagnostics ) THEN
./pkg/exf/exf_diagnostics_fill.F 36 EXF_DIAGNOSTICS_FILL 
      IF ( useDiagnostics ) THEN
./pkg/exf/exf_init_fixed.F 642 EXF_INIT_FIXED 
      IF ( useDiagnostics ) THEN