# HG changeset patch # User jwe # Date 796666594 0 # Node ID 0da1cc2c1947dc08086a9a9592d7e97f9eda6ba6 # Parent 621fef7bcca16622435bcb70f550f90b5cda0d54 [project @ 1995-03-31 16:11:43 by jwe] diff -r 621fef7bcca1 -r 0da1cc2c1947 liboctave/CMatrix.cc --- a/liboctave/CMatrix.cc Fri Mar 31 05:12:26 1995 +0000 +++ b/liboctave/CMatrix.cc Fri Mar 31 16:16:34 1995 +0000 @@ -934,8 +934,8 @@ F77_FCN (zgeco) (tmp_data, &nr, &nc, ipvt, &rcond, z); - volatile double tmp_rcond = rcond; - if (tmp_rcond + 1.0 == 1.0) + volatile double rcond_plus_one = rcond + 1.0; + if (rcond_plus_one == 1.0) { info = -1; copy (tmp_data, data (), len); // Restore contents. @@ -1205,8 +1205,8 @@ F77_FCN (zgeco) (tmp_data, &nr, &nr, ipvt, &rcond, z); - volatile double tmp_rcond = rcond; - if (tmp_rcond + 1.0 == 1.0) + volatile double rcond_plus_one = rcond + 1.0; + if (rcond_plus_one == 1.0) { info = -1; retval = ComplexDET (); @@ -1287,8 +1287,8 @@ F77_FCN (zgeco) (tmp_data, &nr, &nr, ipvt, &rcond, z); - volatile double tmp_rcond = rcond; - if (tmp_rcond + 1.0 == 1.0) + volatile double rcond_plus_one = rcond + 1.0; + if (rcond_plus_one == 1.0) { info = -2; } @@ -1350,8 +1350,8 @@ F77_FCN (zgeco) (tmp_data, &nr, &nr, ipvt, &rcond, z); - volatile double tmp_rcond = rcond; - if (tmp_rcond + 1.0 == 1.0) + volatile double rcond_plus_one = rcond + 1.0; + if (rcond_plus_one == 1.0) { info = -2; } diff -r 621fef7bcca1 -r 0da1cc2c1947 liboctave/CRowVector.h --- a/liboctave/CRowVector.h Fri Mar 31 05:12:26 1995 +0000 +++ b/liboctave/CRowVector.h Fri Mar 31 16:16:34 1995 +0000 @@ -133,6 +133,8 @@ friend RowVector map (d_c_Mapper f, const ComplexRowVector& a); void map (c_c_Mapper f); + ComplexRowVector linspace (const Complex& x1, const Complex& x2, int n); + Complex min (void) const; Complex max (void) const; diff -r 621fef7bcca1 -r 0da1cc2c1947 liboctave/dMatrix.cc --- a/liboctave/dMatrix.cc Fri Mar 31 05:12:26 1995 +0000 +++ b/liboctave/dMatrix.cc Fri Mar 31 16:16:34 1995 +0000 @@ -583,8 +583,8 @@ F77_FCN (dgeco) (tmp_data, &nr, &nc, ipvt, &rcond, z); - volatile double tmp_rcond = rcond; - if (tmp_rcond + 1.0 == 1.0) + volatile double rcond_plus_one = rcond + 1.0; + if (rcond_plus_one == 1.0) { info = -1; copy (tmp_data, data (), len); // Restore matrix contents. @@ -854,8 +854,8 @@ F77_FCN (dgeco) (tmp_data, &nr, &nr, ipvt, &rcond, z); - volatile double tmp_rcond = rcond; - if (tmp_rcond + 1.0 == 1.0) + volatile double rcond_plus_one = rcond + 1.0; + if (rcond_plus_one == 1.0) { info = -1; retval = DET (); @@ -913,8 +913,8 @@ F77_FCN (dgeco) (tmp_data, &nr, &nr, ipvt, &rcond, z); - volatile double tmp_rcond = rcond; - if (tmp_rcond + 1.0 == 1.0) + volatile double rcond_plus_one = rcond + 1.0; + if (rcond_plus_one == 1.0) { info = -2; } @@ -995,8 +995,8 @@ F77_FCN (dgeco) (tmp_data, &nr, &nr, ipvt, &rcond, z); - volatile double tmp_rcond = rcond; - if (tmp_rcond + 1.0 == 1.0) + volatile double rcond_plus_one = rcond + 1.0; + if (rcond_plus_one == 1.0) { info = -2; } diff -r 621fef7bcca1 -r 0da1cc2c1947 liboctave/dRowVector.h --- a/liboctave/dRowVector.h Fri Mar 31 05:12:26 1995 +0000 +++ b/liboctave/dRowVector.h Fri Mar 31 16:16:34 1995 +0000 @@ -119,6 +119,8 @@ friend RowVector map (d_d_Mapper f, const RowVector& a); void map (d_d_Mapper f); + RowVector linspace (double x1, double x2, int n); + double min (void) const; double max (void) const;