levenberg_marquardt Subroutine

public subroutine levenberg_marquardt(fun, tol, X, F, info)

Uses

  • proc~~levenberg_marquardt~~UsesGraph proc~levenberg_marquardt levenberg_marquardt minpack_module minpack_module proc~levenberg_marquardt->minpack_module module~yaeos__auxiliar yaeos__auxiliar proc~levenberg_marquardt->module~yaeos__auxiliar module~yaeos__math_linalg yaeos__math_linalg proc~levenberg_marquardt->module~yaeos__math_linalg module~yaeos__constants yaeos__constants module~yaeos__auxiliar->module~yaeos__constants module~yaeos__math_linalg->module~yaeos__constants iso_fortran_env iso_fortran_env module~yaeos__constants->iso_fortran_env

Arguments

Type IntentOptional Attributes Name
public subroutine fun(m, n, x, fvec, iflag)
Arguments
Type IntentOptional Attributes Name
integer, intent(in) :: m
integer, intent(in) :: n
real(kind=pr), intent(in) :: x(n)
real(kind=pr), intent(out) :: fvec(m)
integer, intent(inout) :: iflag
real(kind=pr), intent(in) :: tol
real(kind=pr), intent(inout) :: X(:)

Variables vector
real(kind=pr), intent(out) :: F(:)

Function values at solved point
integer, intent(inout) :: info

Calls

proc~~levenberg_marquardt~~CallsGraph proc~levenberg_marquardt levenberg_marquardt lmdif1 lmdif1 proc~levenberg_marquardt->lmdif1

Variables

Type Visibility Attributes Name Initial
integer, public :: iwa(size(x))
integer, public :: lwa
integer, public :: m
integer, public :: n
real(kind=pr), public :: wa(size(F)*size(x)+5*size(x)+size(f))