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

block_trust_region MEX: remove unused parameter

kalman-mex
Sébastien Villemot 2023-07-27 17:29:05 +02:00
parent 0442fe785e
commit b1db895dee
No known key found for this signature in database
GPG Key ID: 2CECE9350ECEBE4A
1 changed files with 0 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
mex/sources/block_trust_region/trust_region.f08
View File

@ -56,7 +56,6 @@ contains
integer :: maxiter_actual
real(real64) :: factor_actual
integer, parameter :: maxslowiter = 15 ! Maximum number of consecutive iterations with slow progress
real(real64), parameter :: macheps = epsilon(x)
real(real64) :: delta ! Radius of the trust region
real(real64), dimension(size(x)) :: fvec ! Current function value
real(real64) :: fn ! Norm of the current function value