no">  157</span>&#160;        <span class="keywordtype">character(len=200)</span> :: output</div>
<div class="line"><a name="l00158"></a><span class="lineno">  158</span>&#160;        </div>
<div class="line"><a name="l00159"></a><span class="lineno">  159</span>&#160;        <span class="keywordtype">integer</span> :: fmt</div>
<div class="line"><a name="l00160"></a><span class="lineno">  160</span>&#160;        <span class="keywordtype">character(len=200)</span> :: strbuffer</div>
<div class="line"><a nam