wrk = invals(icrs)</div>
<div class="line"><a name="l00099"></a><span class="lineno">   99</span>&#160;       <span class="keywordflow">Do</span> idcr = icrs - 1, 1, -1</div>
<div class="line"><a name="l00100"></a><span class="lineno">  100</span>&#160;          <span class="keywordflow">If</span> (xwrk &gt;= invals(irngt(idcr))) <span class="keywordflow">Exit</span></div>
<div class="line"><a name="l00101"></a><span class="lineno">  101</span>&#160;          irngt(idcr+1) = irngt(idcr)</div>
<div class="li