/*Copyright (C) 1992, 1996 by Thomas Glen Smith. All Rights Reserved.*/
/* ne APL2 V1.0.0 ******************************************************
* Returns 1 or 0 depending on whether left is not equal to rite. *
***********************************************************************/
#define INCLUDES 0
#include "includes.h"
int ne(left,rite)
double left,rite;
{
extern double fuzz;
double diff;
diff = (left > rite) ? left-rite : rite-left;
return(diff > fuzz);
}