From 80cbe0c15f099f4e3e060f3976b0fa4a3daed31f Mon Sep 17 00:00:00 2001 From: Gautam Bisht Date: Fri, 1 Nov 2019 08:29:50 -0700 Subject: [PATCH] Revert "Merge branch 'jinyuntang/lnd/c_inbal_fix' into next (PR #3257)" This reverts commit ec93239c3df42bbfe0c9c23fec27eeee4dfce939, reversing changes made to 93b005fd54feb9c519f3c6361b78582b6ba79d03. --- components/clm/src/data_types/VegetationDataType.F90 | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/components/clm/src/data_types/VegetationDataType.F90 b/components/clm/src/data_types/VegetationDataType.F90 index ae82dc52f9d7..111ca39b5912 100644 --- a/components/clm/src/data_types/VegetationDataType.F90 +++ b/components/clm/src/data_types/VegetationDataType.F90 @@ -8070,10 +8070,12 @@ subroutine veg_cf_summary(this, bounds, num_soilp, filter_soilp, num_soilc, filt this%psnshade_to_cpool(p) ! maintenance respiration (MR) - this%leaf_mr(p) = this%leaf_curmr(p) + this%leaf_xsmr(p) - this%froot_mr(p) = this%froot_curmr(p) + this%froot_xsmr(p) - this%livestem_mr(p) = this%livestem_curmr(p) + this%livestem_xsmr(p) - this%livecroot_mr(p) = this%livecroot_curmr(p) + this%livecroot_xsmr(p) + if ( trim(isotope) == 'c13' .or. trim(isotope) == 'c14') then + this%leaf_mr(p) = this%leaf_curmr(p) + this%leaf_xsmr(p) + this%froot_mr(p) = this%froot_curmr(p) + this%froot_xsmr(p) + this%livestem_mr(p) = this%livestem_curmr(p) + this%livestem_xsmr(p) + this%livecroot_mr(p) = this%livecroot_curmr(p) + this%livecroot_xsmr(p) + endif this%mr(p) = & this%leaf_mr(p) + &