n</span></div>
<div class="line"><a name="l00324"></a><span class="lineno">  324</span>&#160;               delt = min(delt*f_inc,1.5*nebstep)</div>
<div class="line"><a name="l00325"></a><span class="lineno">  325</span>&#160;               alph = alph * f_alp</div>
<div class="line"><a name="l00326"></a><span class="lineno">  326</span>&#160;            <span class="keywordflow">elseif</span> (pfire &lt;= 0.0d0) <span class="keywordflow">then</span></div>
<div class="line"><a name="l00327"></a><span class