nt(in)</span> :: beforeline</div>
<div class="line"><a name="l00198"></a><span class="lineno">  198</span>&#160;        </div>
<div class="line"><a name="l00199"></a><span class="lineno">  199</span>&#160;        <span class="keywordtype">integer</span> :: effunit</div>
<div class="line"><a name="l00200"></a><span class="lineno">  200</span>&#160;        <span class="keywordtype">real(8)</span> :: effunits(2)</div>
<div class="line"><a name="l00201"></a><span class="lineno">  201</span>&#160;        <span c