stepan
/
dynare
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

logarithmic_reduction.m: use positive penalty add-on

bgp-dev
Johannes Pfeifer 2022-10-11 16:13:03 +02:00
parent 5226db4b3c
commit fe0606ae06
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
matlab/missing/mex/logarithmic_reduction/logarithmic_reduction.m
View File

@ -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;

2
mex/sources/logarithmic_reduction/mexFunction.f08
View File

@ -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