Skip to content

Commit

Permalink
Fix the setting of model landmask when interpolating
Browse files Browse the repository at this point in the history
GLDAS data.

Fixes #199.
  • Loading branch information
GeorgeGayno-NOAA committed Apr 24, 2024
1 parent 9b0ac7b commit 8a85857
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion physics/Interstitials/UFS_SCM_NEPTUNE/sfcsub.F
Original file line number Diff line number Diff line change
Expand Up @@ -7670,7 +7670,7 @@ subroutine clima(lugb,iy,im,id,ih,fh,len,lsoil,slmskl,slmskw, &
! points. so for efficiency, don't have fixrdc try to
! find a value at landice points as defined by the vet type (vet).
allocate(slmask_noice(len))
slmask_noice = 1.0
slmask_noice = slmskl
do i = 1, len
if (nint(vet(i)) < 1 .or.
& nint(vet(i)) == landice_cat) then
Expand Down

0 comments on commit 8a85857

Please sign in to comment.