mirror of
https://gitlab.com/libeigen/eigen.git
synced 2025-05-25 15:46:56 +08:00
fix a bug introduced between the cminpack version of Manolis Lourakis and
the one from Frédéric Devernay. Here, we want to compute the max over the column, the -1 is not needed in fortran because indices start at 1, contrary to c/c++.
This commit is contained in:
parent
9651e0c503
commit
1403cea087
@ -38,7 +38,7 @@ void ei_dogleg(
|
|||||||
for (i = 0; i <= j; ++i) {
|
for (i = 0; i <= j; ++i) {
|
||||||
/* Computing MAX */
|
/* Computing MAX */
|
||||||
temp = std::max(temp,ei_abs(r[l]));
|
temp = std::max(temp,ei_abs(r[l]));
|
||||||
l = l + n - i;
|
l = l + n - i - 1;
|
||||||
}
|
}
|
||||||
temp = epsmch * temp;
|
temp = epsmch * temp;
|
||||||
if (temp == 0.)
|
if (temp == 0.)
|
||||||
|
Loading…
x
Reference in New Issue
Block a user