() Effektivitetstrends:
LIST + #dtl   dtla dtlb dtle dtlh                        &
              dtlne dtlnf dtlng dtlnz dtlqf dtlqz dtlqs
LIST + #dtk   dtka dtkb dtke                             &
              dtkne dtknf dtkng dtknz dtkqf dtkqz dtkqs
LIST + #dtb   dtba dtbb                                  &
              dtbne dtbnf dtbng dtbnz dtbqf dtbqz dtbqs
LIST + #dte   dtea dteb dteh                             &
              dtene dtenf dteng dtenz dteqf dteqz dteqs
LIST + #dtm   dtma dtmb dtme dtmh                        &
              dtmne dtmnf dtmng dtmnz dtmqf dtmqz dtmqs

READ <pcim> lang100;
UPD <#per1 #per2> #dtl * 1.01  ;
UPD <#per1 #per2> #dtk * 1.00  ;
UPD <#per1 #per2> #dtb * 1.00  ;
UPD <#per1 #per2> #dte * 1.00  ;
UPD <#per1 #per2> #dtm * 1.00  ;
UPD <#per1 #per2> klohh * 1.01  ;
UPD <#per1 #per2> Qwo  * 0.99  ;
TIME #per1 #per2 ;
SIM ;