"keyword">end</span>
0134 fclose(fid);
0135 nm=min([length(N.a) length(N.b) length(N.m) length(N.n)]);
0136 fn=fieldnames(N);
0137 <span class="keyword">for</span> i=1:length(fn),
0138     fie=getfield(N,fn{i});
0139     <span class="keyword">if</span> (min(size(fie))==1)&amp;&amp;(length(fie)&gt;nm), fie(nm+1:end)=[];N=setfield(N,fn{i},fie); <span class="keyword">end</span>
0140 <span class="keyword">end</span>
0141 N.b(N.b&lt;0)=0;N.n(N.n&lt;0)=0;
0142 <span class="comment">% if isfield(N,'err')&amp;&amp;