fsolve.f90 File Reference

Go to the source code of this file.

Functions/Subroutines
subroutine	dogleg (n, r, lr, diag, qtb, delta, x)
real(kind=rk) function	enorm (n, x)
subroutine	fdjac1 (fcn, n, x, fvec, fjac, ldfjac, ml, mu, epsfcn)
subroutine	fsolve (fcn, n, x, fvec, tol, info)
subroutine	hybrd (fcn, n, x, fvec, xtol, maxfev, ml, mu, epsfcn, diag, mode, factor, info, nfev, fjac, ldfjac, r, lr, qtf)
subroutine	qform (m, n, q, ldq)
subroutine	qrfac (m, n, a, lda, pivot, ipvt, lipvt, rdiag, acnorm)
subroutine	r1mpyq (m, n, a, lda, v, w)
subroutine	r1updt (m, n, s, ls, u, v, w, sing)

Function/Subroutine Documentation

dogleg()

subroutine dogleg	(	integer	n,
		real ( kind = rk ), dimension(lr)	r,
		integer	lr,
		real ( kind = rk ), dimension(n)	diag,
		real ( kind = rk ), dimension(n)	qtb,
		real ( kind = rk )	delta,
		real ( kind = rk ), dimension(n)	x
	)

Definition at line 2 of file fsolve.f90.

Here is the call graph for this function:

enorm()

real ( kind = rk ) function enorm	(	integer	n,
		real ( kind = rk ), dimension(n)	x
	)

Definition at line 214 of file fsolve.f90.

fdjac1()

subroutine fdjac1	(	external	fcn,
		integer	n,
		real ( kind = rk ), dimension(n)	x,
		real ( kind = rk ), dimension(n)	fvec,
		real ( kind = rk ), dimension(ldfjac,n)	fjac,
		integer	ldfjac,
		integer	ml,
		integer	mu,
		real ( kind = rk )	epsfcn
	)

Definition at line 345 of file fsolve.f90.

fsolve()

subroutine fsolve	(	external	fcn,
		integer	n,
		real ( kind = rk ), dimension(n)	x,
		real ( kind = rk ), dimension(n)	fvec,
		real ( kind = rk )	tol,
		integer	info
	)

Definition at line 503 of file fsolve.f90.

Here is the call graph for this function:

hybrd()

subroutine hybrd	(	external	fcn,
		integer	n,
		real ( kind = rk ), dimension(n)	x,
		real ( kind = rk ), dimension(n)	fvec,
		real ( kind = rk )	xtol,
		integer	maxfev,
		integer	ml,
		integer	mu,
		real ( kind = rk )	epsfcn,
		real ( kind = rk ), dimension(n)	diag,
		integer	mode,
		real ( kind = rk )	factor,
		integer	info,
		integer	nfev,
		real ( kind = rk ), dimension(ldfjac,n)	fjac,
		integer	ldfjac,
		real ( kind = rk ), dimension(lr)	r,
		integer	lr,
		real ( kind = rk ), dimension(n)	qtf
	)

Definition at line 631 of file fsolve.f90.

Here is the call graph for this function:

qform()

subroutine qform	(	integer	m,
		integer	n,
		real ( kind = rk ), dimension(ldq,m)	q,
		integer	ldq
	)

Definition at line 1120 of file fsolve.f90.

qrfac()

subroutine qrfac	(	integer	m,
		integer	n,
		real ( kind = rk ), dimension(lda,n)	a,
		integer	lda,
		logical	pivot,
		integer, dimension(lipvt)	ipvt,
		integer	lipvt,
		real ( kind = rk ), dimension(n)	rdiag,
		real ( kind = rk ), dimension(n)	acnorm
	)

Definition at line 1223 of file fsolve.f90.

Here is the call graph for this function:

r1mpyq()

subroutine r1mpyq	(	integer	m,
		integer	n,
		real ( kind = rk ), dimension(lda,n)	a,
		integer	lda,
		real ( kind = rk ), dimension(n)	v,
		real ( kind = rk ), dimension(n)	w
	)

Definition at line 1421 of file fsolve.f90.

r1updt()

subroutine r1updt	(	integer	m,
		integer	n,
		real ( kind = rk ), dimension(ls)	s,
		integer	ls,
		real ( kind = rk ), dimension(m)	u,
		real ( kind = rk ), dimension(n)	v,
		real ( kind = rk ), dimension(m)	w,
		logical	sing
	)

Definition at line 1534 of file fsolve.f90.