Mercurial > hg > octave-lyh
diff liboctave/Matrix-ext.cc @ 326:6ed068a55a1a
[project @ 1994-02-03 01:04:02 by jwe]
| author | jwe |
|---|---|
| date | Thu, 03 Feb 1994 01:04:22 +0000 |
| parents | 3c23b8ea9099 |
| children | ccb101b39cf4 |
line wrap: on
line diff
--- a/liboctave/Matrix-ext.cc +++ b/liboctave/Matrix-ext.cc @@ -26,6 +26,7 @@ #endif #include <iostream.h> +#include <float.h> #include "Matrix.h" #include "mx-inlines.cc" @@ -850,13 +851,13 @@ int DET::value_will_overflow (void) const { - return det[2] + 1 > log10 (MAXDOUBLE) ? 1 : 0; + return det[2] + 1 > log10 (DBL_MAX) ? 1 : 0; } int DET::value_will_underflow (void) const { - return det[2] - 1 < log10 (MINDOUBLE) ? 1 : 0; + return det[2] - 1 < log10 (DBL_MIN) ? 1 : 0; } double @@ -880,13 +881,13 @@ int ComplexDET::value_will_overflow (void) const { - return det[2].real () + 1 > log10 (MAXDOUBLE) ? 1 : 0; + return det[2].real () + 1 > log10 (DBL_MAX) ? 1 : 0; } int ComplexDET::value_will_underflow (void) const { - return det[2].real () - 1 < log10 (MINDOUBLE) ? 1 : 0; + return det[2].real () - 1 < log10 (DBL_MIN) ? 1 : 0; } Complex