pan class="comment">% If old header type, convert</span>
0381     <span class="keyword">if</span> isfield(Header(1),<span class="string">'NumberSamples'</span>)
0382         fprintf(<span class="string">'Found old header format.Converting!\n'</span>)
0383         <span class="keyword">for</span> k=1:length(Data)
0384             Header(k).NoValues=Header(k).NumberSamples;
0385         <span class="keyword">end</span>
0386         Header=rmfield(Header,<span class="string">'NumberSamples'</span>);
0387      