Skip to content

Commit

Permalink
Fix target leaf carbon when leaves are off
Browse files Browse the repository at this point in the history
The target leaf carbon should be zero when leaves are off.  This was accidentally removed when deleting some code that should be incorporated when pull request NGEET#801 (Multiple updates to drought deciduous phenology) is incorporated.
  • Loading branch information
mpaiao authored Apr 6, 2022
1 parent 621b3b0 commit bd558d8
Showing 1 changed file with 20 additions and 0 deletions.
20 changes: 20 additions & 0 deletions parteh/PRTAllometricCarbonMod.F90
Original file line number Diff line number Diff line change
Expand Up @@ -485,6 +485,16 @@ subroutine DailyPRTAllometricCarbon(this)
call bstore_allom(dbh,ipft,canopy_trim,target_store_c)



! -----------------------------------------------------------------------------------
! II 1/2. Update target biomass based on the leaf status.
! -----------------------------------------------------------------------------------
select case (leaf_status)
case (leaves_off)
target_leaf_c = 0.0_r8
end select


! -----------------------------------------------------------------------------------
! III. Prioritize some amount of carbon to replace leaf/root turnover
! Make sure it isnt a negative payment, and either pay what is available
Expand Down Expand Up @@ -1120,6 +1130,16 @@ subroutine DailyPRTAllometricCarbonSimpler(this)
call bstore_allom(dbh,ipft,canopy_trim,target_store_c)



! -----------------------------------------------------------------------------------
! II 1/2. Update target biomass based on the leaf status.
! -----------------------------------------------------------------------------------
select case (leaf_status)
case (leaves_off)
target_leaf_c = 0.0_r8
end select


! -----------------------------------------------------------------------------------
! III. If carbon is available, bring all the pools as close to the allometry
! as possible. This also includes the storage pool, even though carbon may
Expand Down

0 comments on commit bd558d8

Please sign in to comment.