Mercurial > hg > octave-thorsten
changeset 326:6ed068a55a1a
[project @ 1994-02-03 01:04:02 by jwe]
author | jwe |
---|---|
date | Thu, 03 Feb 1994 01:04:22 +0000 |
parents | 76858c603790 |
children | 62ba7bbb62e3 |
files | liboctave/Matrix-ext.cc liboctave/Matrix.h |
diffstat | 2 files changed, 5 insertions(+), 5 deletions(-) [+] |
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