diff --git a/modules/14_yields/dynamic_aug18/preloop.gms b/modules/14_yields/dynamic_aug18/preloop.gms index 3179776535..b98712e6a4 100644 --- a/modules/14_yields/dynamic_aug18/preloop.gms +++ b/modules/14_yields/dynamic_aug18/preloop.gms @@ -7,8 +7,8 @@ i14_yields(t,j,kve,w) = f14_yields(t,j,kve,w); ***YIELD CORRECTION FOR 2ND GENERATION BIOENERGY CROPS************************************* -i14_yields(t,j,"begr",w) = i14_yields(t,j,"begr",w)*sum(cell(i,j),fm_tau1995(i))/fm_tau1995("EUR"); -i14_yields(t,j,"betr",w) = i14_yields(t,j,"betr",w)*sum(cell(i,j),fm_tau1995(i))/fm_tau1995("EUR"); +i14_yields(t,j,"begr",w) = i14_yields(t,j,"begr",w)*sum(cell(i,j),fm_tau1995(i))/smax(i,fm_tau1995(i)); +i14_yields(t,j,"betr",w) = i14_yields(t,j,"betr",w)*sum(cell(i,j),fm_tau1995(i))/smax(i,fm_tau1995(i)); ***YIELD CORRECTION FOR PASTURE ACCOUNTING FOR REGIONAL DIFFERENCES IN MANAGEMENT*** p14_pyield_LPJ_reg(t,i) = (sum(cell(i,j),i14_yields(t,j,"pasture","rainfed")*pm_land_start(j,"past"))/sum(cell(i,j),pm_land_start(j,"past")) ); diff --git a/modules/32_forestry/affore_vegc_dec16/presolve.gms b/modules/32_forestry/affore_vegc_dec16/presolve.gms index c902363c7b..8bdfe6b1b4 100644 --- a/modules/32_forestry/affore_vegc_dec16/presolve.gms +++ b/modules/32_forestry/affore_vegc_dec16/presolve.gms @@ -5,7 +5,7 @@ *** | Contact: magpie@pik-potsdam.de * Limit demand for prescribed NPI/NDC afforestation in `p32_aff_pol` if not enough suitable area (`p32_aff_pot`) for afforestation is available. - p32_aff_pot(t,j) = pcm_land(j,"crop") + pcm_land(j,"past"); + p32_aff_pot(t,j) = (vm_land.l(j,"crop") - vm_land.lo(j,"crop")) + (vm_land.l(j,"past") - vm_land.lo(j,"past")); if((ord(t) > 1), p32_aff_pol(t,j)$(p32_aff_pol(t,j) - p32_aff_pol(t-1,j) > p32_aff_pot(t,j)) = p32_aff_pol(t-1,j) + p32_aff_pot(t,j); );