pan class="keywordtype">        real</span>(real64), <span class="keywordtype">intent(out)</span>, <span class="keywordtype">dimension(:)</span> :: f</div>
<div class="line"><a name="l00086"></a><span class="lineno">   86</span>&#160;        <span class="keyword">call </span>this%m_rts(x, y, f)</div>
<div class="line"><a name="l00087"></a><span class="lineno">   87</span>&#160;    <span class="keyword">end subroutine</span></div>
<div class="line"><a name="l00088"></a><span class="lineno">   88</span>&#160;