From adf702f3bbfa6a671261cc4847d2371fd2b94f7a Mon Sep 17 00:00:00 2001 From: lholland-noaa <165287123+lholland-noaa@users.noreply.github.com> Date: Tue, 1 Oct 2024 15:54:47 -0400 Subject: [PATCH] Update CCPr_DryDep_Mod.F90 --- src/process/drydep/CCPr_DryDep_Mod.F90 | 2 ++ 1 file changed, 2 insertions(+) diff --git a/src/process/drydep/CCPr_DryDep_Mod.F90 b/src/process/drydep/CCPr_DryDep_Mod.F90 index 26044fa8..ca66de87 100644 --- a/src/process/drydep/CCPr_DryDep_Mod.F90 +++ b/src/process/drydep/CCPr_DryDep_Mod.F90 @@ -242,6 +242,8 @@ SUBROUTINE CCPr_DryDep_Run( MetState, DiagState, DryDepState, ChemState, RC ) !print *, "drydepf(1,1) = ", drydepf(1,1) DryDepState%drydep_frequency(ChemState%DryDepIndex(i)) = drydepf(1,1) DryDepState%drydep_vel(ChemState%DryDepIndex(i)) = MetState%ZMID(1) * drydepf(1,1) + DiagState%drydep_frequency= DryDepState%drydep_frequency(ChemState%DryDepIndex(i)) + DiagState%drydep_vel = DryDepState%drydep_vel(ChemState%DryDepIndex(i)) ! apply drydep velocities/freq to chem species dqa = 0.