diff --git a/core/datainput.gms b/core/datainput.gms index cc1fca607..6b70d3f9c 100644 --- a/core/datainput.gms +++ b/core/datainput.gms @@ -402,9 +402,9 @@ pm_IO_trade(ttot,regi,enty,char) = f_IO_trade(ttot,regi,enty,char) * sm_EJ_2_TWa *LB* use scaled data for export to guarantee net trade = 0 for each traded good loop(tradePe, - loop(t, - if(sum(regi2, pm_IO_trade(t,regi2,tradePe,"Xport")) ne 0, - pm_IO_trade(t,regi,tradePe,"Xport") = pm_IO_trade(t,regi,tradePe,"Xport") * sum(regi2, pm_IO_trade(t,regi2,tradePe,"Mport")) / sum(regi2, pm_IO_trade(t,regi2,tradePe,"Xport")); + loop(ttot, + if(sum(regi2, pm_IO_trade(ttot,regi2,tradePe,"Xport")) ne 0, + pm_IO_trade(ttot,regi,tradePe,"Xport") = pm_IO_trade(ttot,regi,tradePe,"Xport") * sum(regi2, pm_IO_trade(ttot,regi2,tradePe,"Mport")) / sum(regi2, pm_IO_trade(ttot,regi2,tradePe,"Xport")); ); ); );