/*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); }