Skip to content

Commit

Permalink
Merge remote-tracking branch 'samsrabin/refer-to-issue-2227' into sub…
Browse files Browse the repository at this point in the history
…set_data_fix
  • Loading branch information
slevis-lmwg committed Dec 8, 2023
2 parents 167d445 + 19a97fb commit dc3f609
Showing 1 changed file with 4 additions and 0 deletions.
4 changes: 4 additions & 0 deletions src/biogeophys/LakeHydrologyMod.F90
Original file line number Diff line number Diff line change
Expand Up @@ -351,6 +351,10 @@ subroutine LakeHydrology(bounds, &
end if
if (h2osno_temp > 0._r8) then
! Assume that snow bulk density remains the same as before
! NOTE (SSR, 2023-11-08): Small h2osno_temp can cause unrealistically high snow depths: see https://github.com/ESCOMP/CTSM/issues/2227. Suggested fix there is to replace this line with
! snow_depth(c) = h2osno_no_layers(c) * min (snow_depth(c)/h2osno_temp, 1._r8/50._r8)
! where 50 kg/m3 is suggested as a lower limit for snow density.
! As this bug seemingly has never been encountered in CTSM, we are not yet implementing the fix.
snow_depth(c) = snow_depth(c) * h2osno_no_layers(c) / h2osno_temp
else
! Assume a constant snow bulk density = 250.
Expand Down

0 comments on commit dc3f609

Please sign in to comment.