e"><a name="l00069"></a><span class="lineno">   69</span>&#160;        <span class="keywordtype">real(8)</span> :: effunits(2)</div>
<div class="line"><a name="l00070"></a><span class="lineno">   70</span>&#160;        </div>
<div class="line"><a name="l00071"></a><span class="lineno">   71</span>&#160;        <span class="keywordflow">if</span>( present(ccomments) ) <span class="keywordflow">then</span></div>
<div class="line"><a name="l00072"></a><span class="lineno">   72</span>&#160;            ccomment