ass="line"><a id="l00117" name="l00117"></a><span class="lineno">  117</span><span class="keywordtype">type</span>(c_ptr), <span class="keywordtype">intent(in)</span>, <span class="keywordtype">value</span> :: hstmt</div>
<div class="line"><a id="l00118" name="l00118"></a><span class="lineno">  118</span><span class="keywordtype">integer(c_short)</span>, <span class="keywordtype">intent(in)</span>, <span class="keywordtype">value</span> :: ipar</div>
<div class="line"><a id="l00119" name="l00119"></a><span 