From fd5be6437cd972b6848dc0b4b02973dc95115855 Mon Sep 17 00:00:00 2001 From: Dan Rosen Date: Tue, 4 May 2021 08:20:38 -0600 Subject: [PATCH] Fix noahmp401 min values --- lis/surfacemodels/land/noahmp.4.0.1/NoahMP401_lsmMod.F90 | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/lis/surfacemodels/land/noahmp.4.0.1/NoahMP401_lsmMod.F90 b/lis/surfacemodels/land/noahmp.4.0.1/NoahMP401_lsmMod.F90 index 03c3cf930..93283ed81 100644 --- a/lis/surfacemodels/land/noahmp.4.0.1/NoahMP401_lsmMod.F90 +++ b/lis/surfacemodels/land/noahmp.4.0.1/NoahMP401_lsmMod.F90 @@ -321,8 +321,10 @@ subroutine NoahMP401_ini() end if ! Initialize min/max values to implausible values. - NOAHMP401_struc(n)%noahmp401(:)%tair_agl_min = 999.0 - NOAHMP401_struc(n)%noahmp401(:)%rhmin = 999.0 + do t=1, LIS_rc%npatch(n, LIS_rc%lsm_index) + NOAHMP401_struc(n)%noahmp401(t)%tair_agl_min = 999.0 + NOAHMP401_struc(n)%noahmp401(t)%rhmin = 999.0 + enddo ! end of tile (t) loop !------------------------------------------------------------------------ ! TODO: setup number of soil moisture/temperature layers and depth here