pan>(exist(vname) == 0)
0294         <span class="comment">%fprintf('variable frame %s\n does not exist',vname)</span>
0295     <span class="keyword">else</span>
0296         var = eval(vname)';
0297         <span class="keyword">if</span> (isforcing == 1);  var(badpts) = 1.; <span class="keyword">end</span>;
0298         nc{<span class="string">'tpeak'</span>}(i,:) = var;
0299     <span class="keyword">end</span>;
0300     
0301     
0302     <span class="comment">%depth</span>
0303     date = datestr(time