logarithmic_reduction.m: use positive penalty add-on
parent
5226db4b3c
commit
fe0606ae06
|
@ -80,7 +80,7 @@ while cc>tol && kk<=maxit
|
|||
cc = norm(X1-X0,1);
|
||||
if isnan(cc)
|
||||
info(1) = 412;
|
||||
info(2) = -1.;
|
||||
info(2) = 1;
|
||||
return
|
||||
end
|
||||
X0 = X1; U0 = U1;
|
||||
|
|
|
@ -91,7 +91,7 @@ loop: do
|
|||
exit loop
|
||||
elseif (isnan(crit) .or. (info_inv /= 0_blint)) then
|
||||
info(1) = 412._c_double
|
||||
info(2) = -1._c_double
|
||||
info(2) = 1._c_double
|
||||
exit loop
|
||||
end if
|
||||
it = it + 1
|
||||
|
|
Loading…
Reference in New Issue