ceDof;
0074                     RefDir{Count}=Header.ForceDir;
0075                 <span class="keyword">end</span>
0076                 Htemp(:,Count)=Data;
0077                 Count=Count+1;
0078             <span class="keyword">end</span>
0079         <span class="keyword">end</span>
0080     <span class="keyword">end</span>
0081 <span class="keyword">end</span>
0082 close(h)
0083 
0084 <span class="comment">% Check that at least some file was found, else quit</span>
0085 <span class="keyword">if</spa