eno">   75</span>&#160;    <span class="keywordtype">logical</span> :: minimize, ci_flag</div>
<div class="line"><a name="l00076"></a><span class="lineno">   76</span>&#160;    <span class="keywordtype">type</span>(rxp) :: rp, rp1, rp2</div>
<div class="line"><a name="l00077"></a><span class="lineno">   77</span>&#160;    <span class="keywordtype">integer</span> :: i, iter, j, k, idof, n1, n2</div>
<div class="line"><a name="l00078"></a><span class="lineno">   78</span>&#160;<span class="keywordtype">    re