newton_solve Subroutine

public subroutine newton_solve(fun, x, tol, max_iter, its, info)

Arguments

Type

Intent

Optional

Attributes

Name

public subroutine fun(x, f, J)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in)			::	x(:)
real(kind=dp),	intent(out)			::	f(:)
real(kind=dp),	intent(out)			::	J(:,:)

real(kind=dp),

intent(inout)

::

x(:)

real(kind=dp),

intent(in)

::

tol

integer,

intent(in)

::

max_iter

integer,

intent(out)

::

its

integer,

intent(out)

::

info

Variables

Type	Visibility	Attributes		Name		Initial
real(kind=dp),	public		::	J(size(X),size(X))
real(kind=dp),	public		::	Jp(size(X))
real(kind=dp),	public		::	alpha
real(kind=dp),	public		::	dx(size(X))
real(kind=dp),	public		::	f(size(X))
real(kind=dp),	public		::	f_norm
real(kind=dp),	public		::	ftrial(size(X))
real(kind=dp),	public		::	grad_phi_p
integer,	public		::	k
integer,	public		::	n
real(kind=dp),	public		::	phi_trial
real(kind=dp),	public		::	phi_x
real(kind=dp),	public		::	xtrial(size(X))