EXP_BIAS
exponent(r) - EXP_BIAS + 1);
#define isdenormal(ptr) (exponent(ptr) == EXP_BIAS+EXP_UNDER)
if (exp == EXP_BIAS + EXP_UNDER)
else if (exp != EXP_BIAS + EXP_OVER)
return ((exponent(ptr) == EXP_BIAS + EXP_OVER)