READ lang11;
TIME 2011 2071;
GENR tsysp1 = @tsysp1*(1-(1000/(Ssysp1(2011)+Ssysp2(2011)))) $;
GENR tsysp2 = @tsysp2*(1-(1000/(Ssysp1(2011)+Ssysp2(2011)))) $;
SIM 2011 2071;