Skip to content

Commit 3467f88

Browse files
authored
Merge pull request #431 from EDmodel/mpaiao-patch-wood-psi
Bug fix: conditional logic for wood_rwc calculation
2 parents bae4504 + c2f9fb8 commit 3467f88

1 file changed

Lines changed: 1 addition & 1 deletion

File tree

ED/src/dynamics/plant_hydro.f90

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1396,7 +1396,7 @@ subroutine tw2rwc(leaf_water_int,wood_water_int,is_small,bleaf,bsapwooda,bsapwoo
13961396
wood_rwc = wood_water_int / tot_water_sat
13971397
elseif (is_small) then
13981398
wood_rwc = op_buff * small_rwc_min(ipft)
1399-
elseif (is_small) then
1399+
else
14001400
wood_rwc = op_buff * wood_rwc_min(ipft)
14011401
end if
14021402
!------------------------------------------------------------------------------------!

0 commit comments

Comments
 (0)