READ <pcim> lang14;
TIME 2014 2074 ;
Genr fXae  = @fXae *(1+(1000/fe(2014))) $
Genr fe3x  = @fe3x *(1+(1000/fe(2014))) $
Genr fEe2  = @fEe2 *(1+(1000/fe(2014))) $
Genr fEe59 = @fEe59*(1+(1000/fe(2014))) $
Genr fEet  = @fEet *(1+(1000/fe(2014))) $
Genr fEss  = @fEss *(1+(1000/fe(2014))) $
Genr feesq = @feesq*(1+(1000/fe(2014))) $
SIM ;