READ lang13; TIME 2013 2073 ; GENR Qwo = Qwo + 1000/(0.001*klo(2013)*lnakk(2013)*Hgwo(2013)) $ ; SIM ;