Operation

EXPDIF exponent(ST) - exponent(ST(1));
IF EXPDIF < 64
THEN
Q integer obtained by chopping ST ÷ ST(1) toward zero;
ST ST - (ST(1) * Q);
C2 0;
C0, C1, C3 three least-significant bits of Q; (* Q2, Q1, Q0 *)
ELSE
C2 1;
N a number between 32 and 63;
QQ integer obtained by chopping (ST ÷ ST(1)) ÷ 2EXPDIF-N
toward zero;
ST ST - (ST(1) * QQ * 2EXPDIF-N;
FI;

[Back: Description]
[Next: Numeric Exceptions]