00167                     + sqrt_jmi * sqrt_jmk * ddj * coshb
<a name="l00168"></a>00168                dl(k - l, i + 1 - l) = dl(k - l, i + 1 - l) &amp;
<a name="l00169"></a>00169                     - sqrt_ip1 * sqrt_jmk * ddj * sinhb
<a name="l00170"></a>00170                dl(k + 1 - l, i - l) = dl(k + 1 - l, i - l) &amp;
<a name="l00171"></a>00171                     + sqrt_jmi * sqrt_kp1 * ddj * sinhb
<a name="l00172"></a>00172                dl(k + 1 - l, i + 1 - l) = dl(k + 1 - l, i + 1 - l) &amp;
