Update CCPr_DryDep_Mod.F90

bbakernoaa · Oct 1, 2024 · 7b8eeb9 · 7b8eeb9
1 parent ecc6b00
commit 7b8eeb9
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/src/process/drydep/CCPr_DryDep_Mod.F90 b/src/process/drydep/CCPr_DryDep_Mod.F90
@@ -233,8 +233,7 @@ SUBROUTINE CCPr_DryDep_Run( MetState, DiagState, DryDepState, ChemState, RC )
                   ! Fill Diagnostic Variables
                   !--------------------------
                   !!!!FIXME: COME BACK TO THIS LATER
-                  print *, "DiagState%drydep_frequency(ChemState%DryDepIndex(i))=",  &
-                   !DiagState%drydep_frequency(ChemState%DryDepIndex(i))
+                  print *, "size(DiagState%drydep_frequency)=", size(DiagState%drydep_frequency)
                   print *, "ChemState%DryDepIndex(i)=", ChemState%DryDepIndex(i)
                   print *, "drydepf(1,1) = ", drydepf(1,1)
                   !DiagState%drydep_frequency(ChemState%DryDepIndex(i)) = drydepf(1,1)