diary torsclear;for i = 1:2     aika=1000*(10^i);     clear a;       a(1,:)=clock;       sim('testi_ajo_to',aika);       a(2,:)=clock;       kesto(i,:) = (a(2,:)-a(1,:));aika aendkestoexit