00001 /* public domain rewrite of finite(3) */ 00002 00003 int 00004 finite(double n) 00005 { 00006 return !isnan(n) && !isinf(n); 00007 } 00008