READ <pcim> lang15;
TIME 2015 2075 ;
Genr fXae  = @fXae *(1+((0.001*Y(2015)/pxa(2015))/fe(2015))) $
Genr fe3x  = @fe3x *(1+((0.001*Y(2015)/pe3x(2015))/fe(2015))) $
Genr fEe2  = @fEe2 *(1+((0.001*Y(2015)/pee2(2015))/fe(2015))) $
Genr fEe59 = @fEe59*(1+((0.001*Y(2015)/pee59(2015))/fe(2015))) $
Genr fEet  = @fEet *(1+((0.001*Y(2015)/peet(2015))/fe(2015))) $
Genr fEss  = @fEss *(1+((0.001*Y(2015)/pess(2015))/fe(2015))) $
Genr feesq = @feesq*(1+((0.001*Y(2015)/peesq(2015))/fe(2015))) $
SIM ;