READ <pcim> lang15;
TIME 2015 2015;
GENR jrfvo1 = @jrfvo1 + (0.001*Y/pvo1)*(1+@jrfvo1)/@fvo1 $;
genr Sk_h_o  = 2*@Sk_h_o  $ ;
TIME 2015 2075 ;
GENR tsysp1 = @tsysp1*1.0154 $;
GENR tsysp2 = @tsysp2*1.0154 $;
SIM ;