MACHEP
while (fabs(t/d) > MACHEP)
unsigned short MACHEP[4] = {0x0000,0x0000,0x0000,0x3ca0};
unsigned short MACHEP[4] = {0x3ca0,0x0000,0x0000,0x0000};
unsigned short MACHEP[4] = {0022200,0000000,0000000,0000000};
extern unsigned short MACHEP[];
double MACHEP = 1.11022302462515654042E-16; /* 2**-53 */
double MACHEP = 1.38777878078144567553E-17; /* 2**-56 */
m = 0.25 * MACHEP * volat1 * updown;
if (fabs (err) > ((OKERROR + test1[i].thresh) * MACHEP))
if (fabs (err) > ((OKERROR + test1[i].thresh) * MACHEP))
static double MACHEP = 1.1102230246251565404236316680908203125e-16;
extern double MACHEP, SQRTH, SQRT2;
if (e > test1[i].thresh * MACHEP)
if (e > test2[i].thresh * MACHEP)