ment">! Symmetry in mm to fill in half.</span>
<a name="l00857"></a>00857       <span class="keyword">do</span> mm = -el, -1
<a name="l00858"></a>00858          <span class="keyword">do</span> m = 0, el
<a name="l00859"></a>00859             dl(m,mm) = signs(el) * signs(m) * dl(m,-mm)
<a name="l00860"></a>00860          <span class="keyword">end do</span>
<a name="l00861"></a>00861       <span class="keyword">end do</span>
<a name="l00862"></a>00862 
<a name="l00863"></a>00863 <span class="keyword">    end 