     j = minloc(vec(i:),1)</div>
<div class="line"><a name="l00032"></a><span class="lineno">   32</span>&#160;     <span class="keywordflow">if</span>(j /= 1) <span class="keywordflow">then</span></div>
<div class="line"><a name="l00033"></a><span class="lineno">   33</span>&#160;        call swap(vec(i),vec(i + j - 1))</div>
<div class="line"><a name="l00034"></a><span class="lineno">   34</span>&#160;        call swap(map(i),map(i + j - 1))</div>
<div class="line"><a name="l00035"></a><span class="lineno