s="k">write</span> <span class="p">(</span> <span class="n">ctemp</span><span class="p">(</span><span class="n">j2</span><span class="p">),</span> <span class="s1">&#39;(i8,6x)&#39;</span> <span class="p">)</span> <span class="n">j</span>
       <span class="k">end do</span>

<span class="k">       write</span> <span class="p">(</span> <span class="o">*</span><span class="p">,</span> <span class="s1">&#39;(&#39;&#39;  Col   &#39;&#39;,5a14)&#39;</span> <span class="p">)</span> <span class="n">ctemp</span><s