READ lang22; TIME 2022 2071; SERIES zfimro1 = zfimro1*(1 + 0.001*Y[2022]/(pimro1[2022]*zfimro1[2022])) ; SERIES <2022 2071> Dfxo1i = 1; SERIES <2023 2071> tsysp1 = @tsysp1 + 0.00264; TIME 2022 2071; SIM;