armijo_backtrack Subroutine

private subroutine armijo_backtrack(sub, X_old, F, J, dX, s, t, F_new, J_new, f_norm_new, failed)

Arguments

Type IntentOptional Attributes Name
procedure(to_solve) :: sub
real(kind=pr), intent(in) :: X_old(:)
real(kind=pr), intent(in) :: F(:)
real(kind=pr), intent(in) :: J(:,:)
real(kind=pr), intent(in) :: dX(:)
type(newton_settings), intent(in) :: s
real(kind=pr), intent(inout) :: t
real(kind=pr), intent(inout) :: F_new(:)
real(kind=pr), intent(inout) :: J_new(:,:)
real(kind=pr), intent(inout) :: f_norm_new
logical, intent(out) :: failed

Calls

proc~~armijo_backtrack~~CallsGraph proc~armijo_backtrack armijo_backtrack proc~has_nan_inf has_nan_inf proc~armijo_backtrack->proc~has_nan_inf proc~norm_inf norm_inf proc~armijo_backtrack->proc~norm_inf

Called by

proc~~armijo_backtrack~~CalledByGraph proc~armijo_backtrack armijo_backtrack proc~newton newton proc~newton->proc~armijo_backtrack

Variables

Type Visibility Attributes Name Initial
integer, private :: k
real(kind=pr), private :: m_new
real(kind=pr), private :: m_old
real(kind=pr), private :: slope