diff --git a/SW_Output.c b/SW_Output.c index 00cd6ee64..b4976e736 100644 --- a/SW_Output.c +++ b/SW_Output.c @@ -1353,11 +1353,11 @@ void get_co2effects(void) { month = (SW_Model.month) - tOffset; grass = SW_VegProd.grass.CO2_biomass[month]; shrub = SW_VegProd.shrub.CO2_biomass[month]; - tree = SW_VegProd.tree.CO2_biomass[month]; + tree = SW_VegProd.tree.CO2_pct_live[month]; // Only pct live is affected forb = SW_VegProd.forb.CO2_biomass[month]; BIO_mult = c->co2_biomass_mult; WUE_mult = c->co2_wue_mult; - total = grass + shrub + tree + forb; + total = grass + shrub + forb; #ifdef RSOILWAT p_Rco2effects_mo[SW_Output[eSW_CO2Effects].mo_row + mo_nrow * 0] = SW_Model.year; @@ -1382,14 +1382,14 @@ void get_co2effects(void) { for (i = 0; i < 12; i++) { grass += SW_VegProd.grass.CO2_biomass[i]; shrub += SW_VegProd.shrub.CO2_biomass[i]; - tree += SW_VegProd.tree.CO2_biomass[i]; + tree += SW_VegProd.tree.CO2_pct_live[i]; // Only pct live is affected forb += SW_VegProd.forb.CO2_biomass[i]; } grass /= 12; shrub /= 12; tree /= 12; forb /= 12; - total = grass + shrub + tree + forb; + total = grass + shrub + forb; BIO_mult = c->co2_biomass_mult; WUE_mult = c->co2_wue_mult; diff --git a/SW_VegProd.c b/SW_VegProd.c index e8c76cc5c..587882bc1 100644 --- a/SW_VegProd.c +++ b/SW_VegProd.c @@ -1233,10 +1233,10 @@ void SW_VPD_init(void) { } if (GT(v->fractionTree, 0.)) { - apply_CO2(v->tree.CO2_biomass, v->tree.biomass); + apply_CO2(v->tree.CO2_pct_live, v->tree.pct_live); interpolate_monthlyValues(v->tree.litter, v->tree.litter_daily); - interpolate_monthlyValues(v->tree.CO2_biomass, v->tree.biomass_daily); - interpolate_monthlyValues(v->tree.pct_live, v->tree.pct_live_daily); + interpolate_monthlyValues(v->tree.biomass, v->tree.biomass_daily); + interpolate_monthlyValues(v->tree.CO2_pct_live, v->tree.pct_live_daily); interpolate_monthlyValues(v->tree.lai_conv, v->tree.lai_conv_daily); } diff --git a/SW_VegProd.h b/SW_VegProd.h index 86e201386..913adbfa3 100644 --- a/SW_VegProd.h +++ b/SW_VegProd.h @@ -57,6 +57,7 @@ typedef struct { biomass[MAX_MONTHS], /* monthly aboveground biomass (g/m**2) */ CO2_biomass[MAX_MONTHS], /* monthly aboveground biomass after CO2 effects */ pct_live[MAX_MONTHS], /* monthly live biomass in percent */ + CO2_pct_live[MAX_MONTHS], /* monthly live biomass in percent after CO2 effects */ lai_conv[MAX_MONTHS]; /* monthly amount of biomass needed to produce lai=1 (g/m**2) */ RealD litter_daily[MAX_DAYS + 1], /* daily interpolation of monthly litter values (g/m**2) */