l00186"></a><span class="lineno">  186</span>&#160;        <span class="keywordtype">integer</span> :: i</div>
<div class="line"><a name="l00187"></a><span class="lineno">  187</span>&#160;        <span class="keywordtype">character(255)</span> :: date</div>
<div class="line"><a name="l00188"></a><span class="lineno">  188</span>&#160;        </div>
<div class="line"><a name="l00189"></a><span class="lineno">  189</span>&#160;        effunit = stdout</div>
<div class="line"><a name="l00190"></a><span class=