tr(times(i),30);
0313     vname = [<span class="string">'Dir_'</span>,date(1:8),<span class="string">'_'</span>,date(10:15)];
0314     <span class="keyword">if</span>(exist(vname) == 0)
0315         <span class="comment">%fprintf('variable frame %s\n does not exist',vname)</span>
0316     <span class="keyword">else</span>
0317         var = eval(vname)';
0318         <span class="keyword">if</span> (isforcing == 1); var(badpts) = 0.; <span class="keyword">end</span>;
0319         nc{<span class="string">'wd