DBL_MAX_EXP
#define Big0 (Frac_mask1 | Exp_msk1*(DBL_MAX_EXP+Bias-1))
#define DBL_ADJ (DBL_MAX_EXP - 2 + ((DBL_MANT_DIG - 1) % 4))
#define DBL_ADJ (DBL_MAX_EXP + 4 + ((DBL_MANT_DIG) % 4))
> Exp_msk1*(DBL_MAX_EXP+Bias-1-P))
> Exp_msk1*(DBL_MAX_EXP+Bias-P))
if (z > Exp_msk1*(DBL_MAX_EXP+Bias-1-P)) {
if (y == Exp_msk1*(DBL_MAX_EXP+Bias-1)) {
Exp_msk1*(DBL_MAX_EXP+Bias-P)) {
> Exp_msk1*(DBL_MAX_EXP+Bias-1-P))
#define BIAS (DBL_MAX_EXP - 1)
if (ix <= (BIAS + DBL_MAX_EXP / 2 - CUTOFF) << 20)
#if DBL_MAX_EXP == 1024 /* IEEE */
#elif DBL_MAX_EXP == 127 /* VAX */
#define LDBL_MAX_EXP DBL_MAX_EXP
#define LDBL_MAX_EXP DBL_MAX_EXP
s < DBL_MAX_EXP - DBL_MANT_DIG;
s += (DBL_MAX_EXP - DBL_MANT_DIG - DBL_MIN_EXP)/5) {
s < DBL_MAX_EXP - DBL_MANT_DIG;
s += (DBL_MAX_EXP - DBL_MANT_DIG - DBL_MIN_EXP)/5) {