</span><span class="nx">iseed</span>
<span class="nx">integer</span><span class="w">           </span><span class="o">::</span><span class="w"> </span><span class="nx">Nu</span>
<span class="nx">real</span><span class="w">              </span><span class="o">::</span><span class="w"> </span><span class="nx">x</span><span class="p">(</span><span class="nx">n</span><span class="p">)</span>
<span class="w">   </span><span class="nx">call</span><span class="w"> </span><span class="nx">label</span><span class="p