Hb
Hb = H - Ha;
if( Hb > 0.0L )
Hb -= (1.0L/NXT); /*0.0625L;*/
z = Hb * __polevll( Hb, R, 6 ); /* z = 2**Hb - 1 */