"l00168"></a><span class="lineno">  168</span>&#160;<span class="keywordflow">       End Do</span></div>
<div class="line"><a name="l00169"></a><span class="lineno">  169</span>&#160;       irngt(idcr+1) = icrs</div>
<div class="line"><a name="l00170"></a><span class="lineno">  170</span>&#160;<span class="keywordflow">    End Do</span></div>
<div class="line"><a name="l00171"></a><span class="lineno">  171</span>&#160;<span class="comment">!</span></div>
<div class="line"><a name="l00172"></a><span class="