------------------------------------------------------</span>
      <span class="n">isub</span><span class="o">=</span><span class="n">igets</span><span class="p">(</span><span class="n">name</span><span class="p">)</span>                            <span class="c">! get index entry is stored at</span>
<span class="c">!-----------------------------------------------------------------------------------------------------------------------------------</span>
      <span class="k">if</span><span class="p">(</sp