v class="line"><a name="l00130"></a><span class="lineno">  130</span>&#160;  <span class="keywordtype">implicit none</span></div>
<div class="line"><a name="l00131"></a><span class="lineno">  131</span>&#160;  <span class="keywordtype">integer</span>, <span class="keywordtype">intent(in)</span> :: n</div>
<div class="line"><a name="l00132"></a><span class="lineno">  132</span>&#160;  <span class="keywordtype">real (kind=8)</span>, <span class="keywordtype">intent(in)</span>    :: a(n,n)</div>
<div class="li