t)</span> :: pibscale</div>
<div class="line"><a id="l00122" name="l00122"></a><span class="lineno">  122</span><span class="keywordtype">integer(c_short)</span>, <span class="keywordtype">intent(out)</span> :: pfnullable</div>
<div class="line"><a id="l00123" name="l00123"></a><span class="lineno">  123</span><span class="keywordtype">integer(c_short)</span> :: fresult</div>
</div>
<div class="line"><a id="l00124" name="l00124"></a><span class="lineno">  124</span><span class="keyword">end function</span><