 ;
<a name="l00103"></a>00103                 }
<a name="l00104"></a>00104 
<a name="l00105"></a>00105                 fprintf(f, <span class="stringliteral">"TER\nEND\n"</span>) ;
<a name="l00106"></a>00106                 fclose(f) ;
<a name="l00107"></a>00107         }
<a name="l00108"></a>00108         <span class="keywordflow">else</span> {
<a name="l00109"></a>00109                 <span class="keywordflow">if</span>(!f) fprintf(stderr, <span class="stringliteral">"! The file %s could not be opened!\n