Skip to content

Commit

Permalink
In Arctic, when having a heavy snowing winter, snow-melting may be la…
Browse files Browse the repository at this point in the history
…sting over summer-solstice. This likely causes no PFT onset stage even non-snow season exists ( but short).
  • Loading branch information
fmyuan committed May 8, 2020
1 parent 47b08a1 commit 9450656
Showing 1 changed file with 7 additions and 1 deletion.
8 changes: 7 additions & 1 deletion components/clm/src/biogeochem/PhenologyMod.F90
Original file line number Diff line number Diff line change
Expand Up @@ -855,7 +855,13 @@ subroutine CNSeasonDecidPhenology (num_soilp, filter_soilp , &
! In that case, it will take until the next winter solstice
! before the growing degree-day summation starts again.

if (onset_gddflag(p) == 1._r8 .and. ws_flag == 0._r8) then
! A note by F-M Yuan (2020-02-21): when having heavy snow winter,
! snow melting may be lasting into July in some Arctic area (esp. East Russia)
! So better to let ONSET stage up to 'offset' starting criteria date.

!if (onset_gddflag(p) == 1._r8 .and. ws_flag == 0._r8) then
if (onset_gddflag(p) == 1._r8 .and. &
(ws_flag == 0._r8 .and. dayl(g) < crit_dayl) ) then
onset_gddflag(p) = 0._r8
onset_gdd(p) = 0._r8
end if
Expand Down

0 comments on commit 9450656

Please sign in to comment.