span><span class="keywordtype">integer(c_int)</span>, <span class="keywordtype">intent(in)</span>, <span class="keywordtype">value</span> :: dwvalue</div>
<div class="line"><a id="l00377" name="l00377"></a><span class="lineno">  377</span><span class="keywordtype">integer(c_int)</span>:: fresult</div>
</div>
<div class="line"><a id="l00378" name="l00378"></a><span class="lineno">  378</span><span class="keyword">end function</span></div>
<div class="line"><a id="l00379" name="l00379"></a><span class="lineno