678"></a>00678          <span class="keyword">do</span> mm = m+1, el
<a name="l00679"></a>00679             dl(m,mm) = signs(m) * signs(mm) * dl(mm,m)
<a name="l00680"></a>00680          <span class="keyword">end do</span>
<a name="l00681"></a>00681       <span class="keyword">end do</span>
<a name="l00682"></a>00682 
<a name="l00683"></a>00683       <span class="comment">! Symmetry in m to fill in half.</span>
<a name="l00684"></a>00684       <span class="keyword">do</span> mm = 0, el
<a name="l00685"></a>