/* non-zero if neither infinite nor NaN, 0 otherwise */ int devFinite(float value) { if (!devIsinf(value) && !devIsnan(value)) return(1); return(0); } /* end devFinite() */
static int finitep(float f) { #if 0 if (!finite(f)) return(0) ; if (fabs(f) > 1e5) return(1) ; return(1) ; #else return(!devIsnan(f)) ; #endif }