
<span class="w">      </span><span class="kt">double precision </span><span class="n">temp</span><span class="w"></span>
<span class="w">      </span><span class="kt">integer </span><span class="n">i</span><span class="p">,</span><span class="n">info</span><span class="p">,</span><span class="n">j</span><span class="p">,</span><span class="n">l</span><span class="p">,</span><span class="n">nrowa</span><span class="p">,</span><span class="n">nrowb</span><span class="w"></span>
<span class="w">      </span><