ame="l00486"></a>00486 
<a name="l00487"></a>00487       <span class="keyword">if</span> (el == 0) <span class="keyword">then</span>
<a name="l00488"></a>00488 
<a name="l00489"></a>00489          dl(0,0) = 1d0
<a name="l00490"></a>00490 
<a name="l00491"></a>00491       <span class="keyword">else</span>
<a name="l00492"></a>00492 
<a name="l00493"></a>00493          <span class="comment">! Eqn (9) of T&amp;N (2006).</span>
<a name="l00494"></a>00494          dmm(0) = - sqrt( (2d0*el-1d0) / <span class="key