371 
<a name="l00372"></a>00372          sinhb = sin(beta / 2.0) <span class="comment">! p</span>
<a name="l00373"></a>00373          coshb = - cos(beta / 2.0) <span class="comment">!-q</span>
<a name="l00374"></a>00374 
<a name="l00375"></a>00375          <span class="comment">! Initialise the plane of the dl-matrix to 0.0 for the recursion</span>
<a name="l00376"></a>00376          <span class="comment">! from l - 1 to l - 1/2.</span>
<a name="l00377"></a>00377 
<a name="l00378"></a>00378          dd(0: 2