"></a><span class="lineno">  102</span>&#160;    indx(j)=imax</div>
<div class="line"><a name="l00103"></a><span class="lineno">  103</span>&#160;    <span class="keywordflow">if</span>(j.ne.n) <span class="keywordflow">then</span></div>
<div class="line"><a name="l00104"></a><span class="lineno">  104</span>&#160;      <span class="keywordflow">if</span>(a(j,j).eq.0.) a(j,j)=tiny</div>
<div class="line"><a name="l00105"></a><span class="lineno">  105</span>&#160;      dum=1./a(j,j)</div>
<div class="line">