LIST + #PM pm01 pm2 pm3r pm59 pm7b pm7y pms pmt &
           pee2 pee59 peet peesq pe01 &
           pxqs boil Sk_h_o Tr_hc_o zpm3q zpm3k

READ lang11; UPD #PM  2011 2071 * 1.01;
UPD dpm3q 2011 2071 = 1
UPD dpm3k 2011 2071 = 1
SIM 2011 2071