</a><span class="lineno">   41</span>&#160;      <span class="keywordtype">double precision</span> rr,ui,t</div>
<div class="line"><a name="l00042"></a><span class="lineno">   42</span>&#160;      <span class="keywordtype">integer</span> i,j</div>
<div class="line"><a name="l00043"></a><span class="lineno">   43</span>&#160; </div>
<div class="line"><a name="l00044"></a><span class="lineno">   44</span>&#160;      <span class="keywordflow">do</span> i = 1,n</div>
<div class="line"><a name="l00045"></a><span