READ lang19;
TIME 2019 2069;
SERIES zfimro1 = zfimro1 + 0.001*Y[2019]/pimro1[2019] ;
SERIES <2019 2069> Dfxo1i = 1;
TIME 2019 2069;
SIM;