lass="o">+</span><span class="mi">1</span><span class="p">)</span> <span class="o">-</span><span class="mi">1</span>
         <span class="k">call </span><span class="n">sort_int_1real</span><span class="p">(</span><span class="n">g</span><span class="o">=</span><span class="mi">1</span><span class="p">,</span> <span class="n">d</span><span class="o">=</span><span class="n">i2</span> <span class="o">-</span><span class="n">i1</span> <span class="o">+</span><span class="mi">1</span><span class="p">,</span> <