ne"><a name="l00102"></a><span class="lineno">  102</span>&#160;<span class="keywordflow">       End Do</span></div>
<div class="line"><a name="l00103"></a><span class="lineno">  103</span>&#160;       irngt(idcr+1) = icrs</div>
<div class="line"><a name="l00104"></a><span class="lineno">  104</span>&#160;<span class="keywordflow">    End Do</span></div>
<div class="line"><a name="l00105"></a><span class="lineno">  105</span>&#160;<span class="comment">!</span></div>
<div class="line"><a name="l00106"></a><