blob: ca5d22bfe5e9a0eaec6ca23b34c036e60bf564e3 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
/* $Id: isinf.c,v 1.1 1998/01/15 20:54:37 scrappy Exp $ */
#include <ieeefp.h>
#include <math.h>
#include "config.h"
int
isinf(double x)
{
if((fpclass(x) == FP_PINF) || (fpclass(x) == FP_NINF)) return 1;
else return 0;
}
|