GitHub-Proxy/eigen
1
0
Fork 0
mirror of https://gitlab.com/libeigen/eigen.git synced 2025-06-04 18:54:00 +08:00
Code Issues Packages Projects Releases Wiki Activity

forgot to clean this one

Browse Source
This commit is contained in:
Thomas Capricelli 2009-08-22 07:40:43 +02:00
parent c5218c7d38
commit a3e8a14e3a
1 changed files with 2 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
unsupported/Eigen/src/NonLinear/lmpar.h
View File

@ -7,7 +7,6 @@ void ei_lmpar(int n, Scalar *r__, int ldr,
{ {
/* System generated locals */ /* System generated locals */
int r_dim1, r_offset; int r_dim1, r_offset;
Scalar d__1, d__2;
/* Local variables */ /* Local variables */
int i, j, k, l; int i, j, k, l;
@ -157,8 +156,7 @@ L150:
if (par == 0.) { if (par == 0.) {
/* Computing MAX */ /* Computing MAX */
d__1 = dwarf, d__2 = Scalar(.001) * paru; par = std::max(dwarf,Scalar(.001) * paru);
par = std::max(d__1,d__2);
} }
temp = ei_sqrt(par); temp = ei_sqrt(par);
for (j = 1; j <= n; ++j) { for (j = 1; j <= n; ++j) {
@ -220,8 +218,7 @@ L200:
/* compute an improved estimate for par. */ /* compute an improved estimate for par. */
/* Computing MAX */ /* Computing MAX */
d__1 = parl, d__2 = par + parc; par = std::max(parl,par+parc);
par = std::max(d__1,d__2);
/* end of an iteration. */ /* end of an iteration. */