lnovft
lnovft = 7.09782712893383973096e+02;
} else if (w <= lnovft) {
lnovft = 7.09782712893383973096e+02;
if (r < lnovft) {
if (w <= lnovft)
return (scalbnl(expl((w - lnovft) - lnovlo), 16383));
if (r < lnovft) {
r = copysignl(expl((r - lnovft) - lnovlo), x);