"lineno">  123</span>&#160;   <span class="keywordtype">Integer</span>, <span class="keywordtype">Dimension (:)</span>, <span class="keywordtype">Intent (Out)</span> :: IRNGT</div>
<div class="line"><a name="l00124"></a><span class="lineno">  124</span>&#160;   <span class="keywordtype">Integer</span>, <span class="keywordtype">Intent (In)</span> :: NORD</div>
<div class="line"><a name="l00125"></a><span class="lineno">  125</span>&#160;<span class="comment">! _______________________________________________