Symbol Description Uses
diag_dKE 5


File Line number Procedure Code
./pkg/shap_filt/shap_filt_apply_uv.F 134 SHAP_FILT_APPLY_UV 
         diag_dKE = .FALSE.
./pkg/shap_filt/shap_filt_apply_uv.F 141 SHAP_FILT_APPLY_UV 
           diag_dKE = DIAGNOSTICS_IS_ON('SHAP_dKE',myThid)
./pkg/shap_filt/shap_filt_apply_uv.F 145 SHAP_FILT_APPLY_UV 
         IF ( addFrictionHeating .OR. diag_dKE ) THEN
./pkg/shap_filt/shap_filt_apply_uv.F 178 SHAP_FILT_APPLY_UV 
              IF ( diag_dKE ) THEN
./pkg/shap_filt/shap_filt_apply_uv.F 64 SHAP_FILT_APPLY_UV 
      LOGICAL diag_dKE