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 <pcim> lang100;
UPD <#per1 #per2> #PM * 1.01;
UPD <#per1 #per2> dpm3q = 1 ;
UPD <#per1 #per2> dpm3k = 1 ;
TIME #per1 #per2;
SIM ;
