READ lang15;
TIME 2015 2075;
SERIES tsysp1 = @tsysp1*(1-((.001*Y[2015])/(Ssysp1[2015]+Ssysp2[2015]))) ;
SERIES tsysp2 = @tsysp2*(1-((.001*Y[2015])/(Ssysp1[2015]+Ssysp2[2015]))) ;
SIM;
