#endif
bool
-isinf_b (Real r)
+is_inf (Real r)
{
return (fabs (r) > 1e20);
}
complex_multiply (Offset z1, Offset z2)
{
Offset z;
- if (!isinf_b (z2[Y_AXIS]))
+ if (!is_inf (z2[Y_AXIS]))
{
z[X_AXIS] = z1[X_AXIS] * z2[X_AXIS] - z1[Y_AXIS] * z2[Y_AXIS];
z[Y_AXIS] = z1[X_AXIS] * z2[Y_AXIS] + z1[Y_AXIS] * z2[X_AXIS];