Symbol Description Uses
useDiagnostics 110


File Line number Procedure Code
./pkg/exf/exf_init_fixed.F 36 EXF_INIT_FIXED 
      IF ( useDiagnostics ) THEN
./pkg/exf/exf_diagnostics_fill.F 35 EXF_DIAGNOSTICS_FILL 
      IF ( useDiagnostics ) THEN
./pkg/ptracers/ptracers_init_fixed.F 83 PTRACERS_INIT_FIXED 
      IF ( useDiagnostics ) THEN
./model/inc/PARAMS.h 839 NO PROCEDURE 
      LOGICAL useDiagnostics
./model/inc/PARAMS.h 851 NO PROCEDURE 
     &        usefizhi, usegridalt, useDiagnostics, useMNC,
./pkg/gmredi/gmredi_calc_tensor.F 632 GMREDI_CALC_TENSOR 
      IF ( useDiagnostics ) THEN
./pkg/gmredi/gmredi_calc_tensor.F 91 GMREDI_CALC_TENSOR 
      IF ( useDiagnostics ) THEN
./pkg/gmredi/gmredi_init_fixed.F 43 GMREDI_INIT_FIXED 
      IF ( useDiagnostics ) THEN
./pkg/gmredi/gmredi_diagnostics_fill.F 43 GMREDI_DIAGNOSTICS_FILL 
      IF ( useDiagnostics ) THEN
./pkg/aim_v23/aim_diagnostics.F 334 AIM_DIAGNOSTICS 
       IF (useDiagnostics) THEN
./pkg/aim_v23/aim_initialise.F 151 AIM_INITIALISE 
      if ( useDiagnostics ) then
./pkg/aim_v23/aim_do_physics.F 113 AIM_DO_PHYSICS 
      CALL PHY_DRIVER( tYear, useDiagnostics,
./pkg/aim_v23/aim_aim2dyn.F 67 AIM_AIM2DYN 
      IF (useDiagnostics) THEN
./pkg/mom_fluxform/mom_fluxform.F 292 MOM_FLUXFORM 
        IF ( useDiagnostics ) THEN
./pkg/mom_fluxform/mom_fluxform.F 389 MOM_FLUXFORM 
        IF ( useDiagnostics ) THEN
./pkg/mom_fluxform/mom_fluxform.F 471 MOM_FLUXFORM 
        IF ( useDiagnostics ) THEN
./pkg/mom_fluxform/mom_fluxform.F 592 MOM_FLUXFORM 
        IF ( useDiagnostics ) THEN
./pkg/mom_fluxform/mom_fluxform.F 673 MOM_FLUXFORM 
        IF ( useDiagnostics ) THEN
./pkg/mom_fluxform/mom_fluxform.F 771 MOM_FLUXFORM 
        IF ( useDiagnostics )
./pkg/mom_fluxform/mom_fluxform.F 781 MOM_FLUXFORM 
        IF ( useDiagnostics )
./pkg/mom_fluxform/mom_fluxform.F 816 MOM_FLUXFORM 
      IF ( useDiagnostics ) THEN
./model/src/do_the_model_io.F 201 DO_THE_MODEL_IO 
      IF ( useDiagnostics )
./model/src/packages_init_variables.F 84 PACKAGES_INIT_VARIABLES 
      IF ( useDiagnostics ) THEN
./pkg/fizhi/fizhi_wrapper.F 208 FIZHI_WRAPPER 
      if ( useDiagnostics ) then
./pkg/fizhi/fizhi_wrapper.F 234 FIZHI_WRAPPER 
      if ( useDiagnostics ) then
./pkg/fizhi/fizhi_wrapper.F 69 FIZHI_WRAPPER 
      if ( useDiagnostics ) then
./model/src/packages_readparms.F 265 PACKAGES_READPARMS 
      IF ( useDiagnostics ) CALL DIAGNOSTICS_READPARMS( myThid )
./pkg/fizhi/fizhi_init_fixed.F 66 FIZHI_INIT_FIXED 
       if ( useDiagnostics ) then
./model/src/packages_write_pickup.F 214 PACKAGES_WRITE_PICKUP_NOW 
      IF (useDiagnostics) THEN
./verification/fizhi-cs-aqualev20/code/fizhi_init_fixed.F 65 FIZHI_INIT_FIXED 
       if ( useDiagnostics ) then
./verification/OpenAD/code_ad_openad/the_model_main.F 659 THE_MODEL_MAIN 
      IF (useDiagnostics) THEN
./model/src/dynamics.F 642 DYNAMICS 
      IF ( useDiagnostics ) THEN
./model/src/calc_phi_hyd.F 165 CALC_PHI_HYD 
        IF ( useDiagnostics )
./model/src/calc_phi_hyd.F 256 CALC_PHI_HYD 
        IF ( useDiagnostics )
./model/src/external_forcing_surf.F 133 EXTERNAL_FORCING_SURF 
       IF ( useDiagnostics ) THEN
./model/src/packages_check.F 175 PACKAGES_CHECK 
      IF (useDiagnostics) CALL DIAGNOSTICS_CHECK( myThid )
./model/src/packages_check.F 177 PACKAGES_CHECK 
      IF (useDiagnostics)
./model/src/convective_adjustment.F 182 CONVECTIVE_ADJUSTMENT 
          IF ( myIter.NE.nIter0 .AND. useDiagnostics ) THEN
./model/src/forward_step.F 155 FORWARD_STEP 
      IF ( useDiagnostics ) THEN
./model/src/forward_step.F 641 FORWARD_STEP 
        IF ( useDiagnostics ) THEN
./model/src/forward_step.F 695 FORWARD_STEP 
      IF ( useDiagnostics ) THEN
./model/src/packages_init_fixed.F 101 PACKAGES_INIT_FIXED 
      IF ( useDiagnostics ) THEN
./model/src/packages_init_fixed.F 269 PACKAGES_INIT_FIXED 
      IF ( useDiagnostics ) CALL DIAGNOSTICS_INIT_FIXED( myThid )
./model/src/impldiff.F 214 IMPLDIFF 
      IF ( useDiagnostics .AND.tracerId.NE.0 ) THEN
./model/src/the_model_main.F 638 THE_MODEL_MAIN 
      IF (useDiagnostics) THEN
./model/src/timestep.F 130 TIMESTEP 
        IF ( useDiagnostics .AND. externForcDiagIsOn ) THEN
./model/src/timestep.F 148 TIMESTEP 
        IF ( useDiagnostics .AND. externForcDiagIsOn ) THEN
./model/src/timestep.F 212 TIMESTEP 
       IF ( useDiagnostics .AND. externForcDiagIsOn ) THEN
./model/src/timestep.F 230 TIMESTEP 
       IF ( useDiagnostics .AND. externForcDiagIsOn ) THEN
./model/src/timestep.F 343 TIMESTEP 
      IF ( useDiagnostics .AND. externForcDiagIsOn ) THEN
./model/src/timestep.F 348 TIMESTEP 
      IF ( useCDscheme .AND. useDiagnostics ) THEN
./model/src/timestep.F 82 TIMESTEP 
      externForcDiagIsOn = useDiagnostics .AND. momForcing
./model/src/packages_boot.F 124 PACKAGES_BOOT 
      useDiagnostics  =.FALSE.
./model/src/packages_boot.F 74 PACKAGES_BOOT 
     &          useDiagnostics,
./model/src/do_oceanic_phys.F 123 DO_OCEANIC_PHYS 
      IF ( useDiagnostics .AND. fluidIsWater ) THEN
./model/src/do_oceanic_phys.F 576 DO_OCEANIC_PHYS 
      IF ( fluidIsWater .AND. useDiagnostics ) THEN
./model/src/do_oceanic_phys.F 579 DO_OCEANIC_PHYS 
      IF ( ivdc_kappa.NE.0 .AND. useDiagnostics ) THEN
./pkg/kpp/kpp_init_fixed.F 36 KPP_INIT_FIXED 
      IF ( useDiagnostics ) THEN
./pkg/kpp/kpp_do_diags.F 303 KPP_DO_DIAGS 
      IF ( useDiagnostics ) THEN
./pkg/kpp/kpp_routines.F 1485 STATEKPP 
      IF ( useDiagnostics ) THEN
./pkg/kpp/kpp_routines.F 1558 STATEKPP 
         IF ( useDiagnostics ) THEN
./pkg/kpp/kpp_routines.F 1597 STATEKPP 
      IF ( useDiagnostics ) THEN
./pkg/mypackage/mypackage_init_fixed.F 43 MYPACKAGE_INIT_FIXED 
      IF ( useDiagnostics ) THEN
./pkg/mypackage/mypackage_diagnostics_fill.F 37 MYPACKAGE_DIAGNOSTICS_FILL 
      IF ( useDiagnostics ) THEN
./pkg/gridalt/gridalt_update.F 68 GRIDALT_UPDATE 
       if(useDiagnostics) then
./pkg/gridalt/gridalt_initialise.F 62 GRIDALT_INITIALISE 
      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_u_implicit_r.F 200 MOM_U_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_u_sidedrag.F 160 MOM_U_SIDEDRAG 
      IF (useDiagnostics) THEN
./pkg/mom_common/mom_calc_visc.F 560 MOM_CALC_VISC 
      IF (useDiagnostics) THEN
./pkg/mom_common/mom_w_sidedrag.F 135 MOM_W_SIDEDRAG 
      IF (useDiagnostics) THEN
./pkg/mom_common/mom_v_bottomdrag.F 100 MOM_V_BOTTOMDRAG 
      IF (useDiagnostics) THEN
./pkg/mom_common/mom_init_fixed.F 55 MOM_INIT_FIXED 
      IF ( useDiagnostics ) THEN
./pkg/mom_common/mom_u_bottomdrag.F 93 MOM_U_BOTTOMDRAG 
      IF (useDiagnostics) THEN
./pkg/gchem/gchem_init_fixed.F 49 GCHEM_INIT_FIXED 
      IF ( useDiagnostics ) THEN
./pkg/ecco/the_main_loop.F 507 THE_MAIN_LOOP 
      IF ( useDiagnostics ) THEN
./pkg/ecco/ecco_cost_final.F 942 ECCO_COST_FINAL 
      useDiagnostics = .FALSE.
./pkg/ctrl/ctrl_init_ctrlvar.F 110 CTRL_INIT_CTRLVAR 
         useDiagnostics = .FALSE.
./pkg/thsice/thsice_ave.F 134 THSICE_AVE 
      IF ( useDiagnostics ) THEN
./pkg/thsice/thsice_init_fixed.F 43 THSICE_INIT_FIXED 
      IF ( useDiagnostics ) THEN
./pkg/thsice/thsice_step_fwd.F 135 THSICE_STEP_FWD 
      IF ( useDiagnostics ) THEN
./pkg/thsice/thsice_diagnostics_fill.F 49 THSICE_DIAGNOSTICS_FILL 
      IF ( useDiagnostics ) THEN
./pkg/mom_vecinv/mom_vecinv.F 289 MOM_VECINV 
       IF ( useDiagnostics ) THEN
./pkg/mom_vecinv/mom_vecinv.F 468 MOM_VECINV 
      IF ( useDiagnostics ) THEN
./pkg/mom_vecinv/mom_vecinv.F 522 MOM_VECINV 
       IF ( useDiagnostics ) THEN
./pkg/mom_vecinv/mom_vecinv.F 599 MOM_VECINV 
       IF ( useDiagnostics ) THEN
./pkg/mom_vecinv/mom_vecinv.F 620 MOM_VECINV 
        IF ( useDiagnostics ) THEN
./pkg/mom_vecinv/mom_vecinv.F 739 MOM_VECINV 
      IF ( useDiagnostics ) THEN
./pkg/land/land_initialise.F 67 LAND_INITIALISE 
      IF ( useDiagnostics ) CALL LAND_DIAGNOSTICS_INIT( myThid )
./pkg/land/land_do_diags.F 191 LAND_DO_DIAGS 
      IF ( useDiagnostics ) THEN
./pkg/land/land_diagnostics_fill.F 50 LAND_DIAGNOSTICS_FILL 
      IF ( useDiagnostics ) THEN
./pkg/generic_advdiff/gad_advection.F 181 GAD_ADVECTION 
      IF ( useDiagnostics ) THEN
./pkg/generic_advdiff/gad_advection.F 666 GAD_ADVECTION 
        IF ( useDiagnostics ) THEN
./pkg/generic_advdiff/gad_advection.F 813 GAD_ADVECTION 
        IF ( useDiagnostics ) THEN
./pkg/generic_advdiff/gad_implicit_r.F 295 GAD_IMPLICIT_R 
      IF ( useDiagnostics .AND. implicitDiffusion ) THEN
./pkg/generic_advdiff/gad_calc_rhs.F 145 GAD_CALC_RHS 
      IF ( useDiagnostics ) THEN
./pkg/generic_advdiff/gad_calc_rhs.F 250 GAD_CALC_RHS 
        IF ( useDiagnostics ) THEN
./pkg/generic_advdiff/gad_calc_rhs.F 301 GAD_CALC_RHS 
      IF ( useDiagnostics .AND.
./pkg/generic_advdiff/gad_calc_rhs.F 358 GAD_CALC_RHS 
        IF ( useDiagnostics ) THEN
./pkg/generic_advdiff/gad_calc_rhs.F 409 GAD_CALC_RHS 
      IF ( useDiagnostics .AND.
./pkg/generic_advdiff/gad_calc_rhs.F 469 GAD_CALC_RHS 
        IF ( useDiagnostics ) THEN
./pkg/generic_advdiff/gad_calc_rhs.F 525 GAD_CALC_RHS 
      IF ( useDiagnostics .AND.
./pkg/generic_advdiff/salt_fill.F 106 SALT_FILL 
        IF (useDiagnostics)THEN
./pkg/generic_advdiff/salt_fill.F 66 SALT_FILL 
        IF (useDiagnostics)THEN
./pkg/generic_advdiff/gad_init.F 90 GAD_INIT 
      IF ( useDiagnostics ) THEN
./pkg/shap_filt/shap_filt_init_fixed.F 36 SHAP_FILT_INIT_FIXED 
      IF ( useDiagnostics ) THEN
./pkg/shap_filt/shap_filt_apply_ts.F 124 SHAP_FILT_APPLY_TS 
     &                         .AND. useDiagnostics ) THEN
./pkg/shap_filt/shap_filt_apply_ts.F 171 SHAP_FILT_APPLY_TS 
     &                         .AND. useDiagnostics ) THEN
./pkg/shap_filt/shap_filt_apply_uv.F 122 SHAP_FILT_APPLY_UV 
     &                         .AND. useDiagnostics ) THEN