955   FLOAT Zero;  member
1030   Zero = long(0);  in main()
1054   TstCond (Failure, (Zero + Zero == Zero), "0+0 != 0");  in main()
1055   TstCond (Failure, (One - One == Zero), "1-1 != 0");  in main()
1056   TstCond (Failure, (One > Zero), "1 <= 0");  in main()
1059   Z = -Zero;  in main()
1060   if (Z != Zero)  in main()
1071   TstCond (Failure, (Four + Two * (-Two) == Zero), "4 + 2*(-2) != 0");  in main()
1072   TstCond (Failure, (Four - Three - One == Zero), "4-3-1 != 0");  in main()
1074   TstCond (Failure, (MinusOne == (Zero - One)), "-1 != 0-1");  in main()
1075   TstCond (Failure, (MinusOne + One == Zero), "-1+1 != 0");  in main()
1076   TstCond (Failure, (One + MinusOne == Zero), "1+(-1) != 0");  in main()
1077   TstCond (Failure, (MinusOne + FABS (One) == Zero), "-1+abs(1) != 0");  in main()
1078   TstCond (Failure, (MinusOne + MinusOne * MinusOne == Zero),  in main()
1081   TstCond (Failure, Half + MinusOne + Half == Zero, "1/2 + (-1) + 1/2 != 0");  in main()
1091   TstCond (Failure, (ThirtyTwo - TwentySeven - Four - One == Zero),  in main()
1096   TstCond (Failure, TwoForty / Three - Four * Four * Five == Zero,  in main()
1098   TstCond (Failure, TwoForty / Four - Five * Three * Four == Zero,  in main()
1100   TstCond (Failure, TwoForty / Five - Four * Three * Four == Zero,  in main()
1117   while (MinusOne + FABS (Y) < Zero);  in main()
1119   Precision = Zero;  in main()
1127   while (Radix == Zero);  in main()
1171   while (!((U2 <= X) || (X <= Zero)));  in main()
1192   while (!((U1 <= X) || (X <= Zero)));  in main()
1220 	   || (Z == Zero), "Comparison is fuzzy,X=1 but X-1/2-1/2 != 0");  in main()
1265   while (!((Z2 <= X) || (X <= Zero)));  in main()
1273   while (!((Z1 <= Z) || (Z <= Zero)));  in main()
1283       while (!((Y1 <= Y) || (Y <= Zero)));  in main()
1287   while (!((X1 <= X) || (X <= Zero)));  in main()
1311 	      if ((Z1 <= Zero) || (Z2 <= Zero))  in main()
1318 	      if (Z1 != Z2 || Z1 > Zero)  in main()
1368   if ((X == Zero) && (Y == Zero) && (Z == Zero) && (T == Zero))  in main()
1380   TstCond (Failure, (Y <= Zero)  in main()
1381 	   && (Z <= Zero), "* gets too many final digits wrong.\n");  in main()
1391   TstCond (Defect, X == Zero && Y == Zero && Z == Zero,  in main()
1400   if ((X == Zero) && (Y == Zero) && (Z == Zero))  in main()
1409   TstCond (Serious, Y < Zero, "Computed value of 1/1.000..1 >= 1");  in main()
1418   TstCond (Failure, X == Zero && Y == Zero,  in main()
1434   if (F9 != One && F9 - One >= Zero)  in main()
1496   if ((X == Zero) && (Y == Zero) && (Z == Zero) && (T <= Zero))  in main()
1512       if ((X == Zero) && (Y == Zero) && (Z == Zero) && (T == Zero)  in main()
1513 	  && (StickyBit == Zero) && (Y1 == Half))  in main()
1518       else if ((X + U2 == Zero) && (Y < Zero) && (Z + U2 == Zero)  in main()
1519 	       && (T < Zero) && (StickyBit + U2 == Zero) && (Y1 < Half))  in main()
1546   if (!((X > Zero) || (Y > Zero) || (Z > Zero) || (T > Zero)))  in main()
1561       if ((X == Zero) && (Y == Zero) && (Z == Zero) && (T == Zero)  in main()
1562 	  && (Y2 == Zero) && (Y2 == Zero) && (Y1 - Half == F9 - Half))  in main()
1569       else if ((X < Zero) && (Y < Zero) && (Z < Zero) && (T < Zero)  in main()
1570 	       && (Y2 < Zero) && (Y1 - Half < F9 - Half))  in main()
1592   if ((X == Zero) && (Y == Zero))  in main()
1605       if ((X == Zero) && (Y == Zero))  in main()
1613 	  if ((X == Zero) && (Y == Zero))  in main()
1634   if (StickyBit != Zero)  in main()
1636       S = Zero;  in main()
1639   StickyBit = Zero;  in main()
1649       if ((Z - One <= Zero) && (T - One >= U2))  in main()
1653 	  if ((Z - T >= U2) && (Y - T == Zero))  in main()
1659 	      if ((Z - One == Zero) && (T - F9 == Zero))  in main()
1664 		  if ((T - F9 == Zero) && (F9 - U1 - Q == Zero))  in main()
1671 		      if (T == Zero && X + Radix * U2 - Z == Zero)  in main()
1677 			      if ((Y - One == Zero))  in main()
1714   while (!((I > NoTrials) || (Z9 != Zero)));  in main()
1725   if (!((I == NoTrials) || (Z9 == Zero)))  in main()
1733   TstCond (Failure, (Zero == SQRT (Zero))  in main()
1734 	   && (-Zero == SQRT (-Zero))  in main()
1736   MinSqEr = Zero;  in main()
1737   MaxSqEr = Zero;  in main()
1738   J = Zero;  in main()
1748   if (J != Zero)  in main()
1751   J = Zero;  in main()
1767       if (J > Zero)  in main()
1831       while (X > Zero);  in main()
1870   E1 = Zero;  in main()
1871   Q = Zero;  in main()
1885 	  Y1 = Zero;  in main()
1894       UfThold = Zero;  in main()
1904 	      if ((UfThold == Zero) && (Y1 != Y2))  in main()
1913   if (PseudoZero != Zero)  in main()
1920       if (PseudoZero <= Zero)  in main()
1926 	  if (X <= Zero)  in main()
1948   if (!((E1 == Zero) || (E1 == E0)))  in main()
1955 	  if (PseudoZero == Zero)  in main()
1971   if (E1 == Zero)  in main()
1973   if (UfThold == Zero)  in main()
2038       if (!((X == Z) || (X - Z != Zero)))  in main()
2094       if (!((V9 >= Zero) && (V9 <= (Radix + Radix + E9) * UfThold)))  in main()
2202       if (Z != Zero)  in main()
2283 	  if (V9 == Zero)  in main()
2296   MyZero = Zero;  in main()
2304     printf ("  %s .\n", (Zero / MyZero).str());  in main()
2356 	      (Radix - Two) * (Radix - Nine - One) == Zero)  in main()
2362 		   (Precision - TwentySeven - TwentySeven + One) == Zero))  in main()
2454   if (SqEr != Zero)  in SqXMinX()
2476   if (Z <= Zero)  in NewD()
2512 	  if (Z == Zero && Q <= Zero)  in IsYeqX()
2538   if (Z != Zero)  in TstPtUf()