rdflow">if</span>(f) {
<a name="l00300"></a>00300 
<a name="l00301"></a>00301                 <span class="keywordflow">if</span>(pockets){
<a name="l00302"></a>00302                 fprintf(f, <span class="stringliteral">"HEADER\n"</span>) ;
<a name="l00303"></a>00303                 fprintf(f, <span class="stringliteral">"HEADER This is a pqr format file writen by the programm fpocket.                 \n"</span>) ;
<a name="l00304"></a>00304                 fprintf(f, <span class="stringliteral">"HEADER I