linear_solver_ecm_new.f90 File Reference

Functions/Subroutines
subroutine	lsolve (a, nsite, q_tmp)
	lsolve, AX = B
subroutine	dgesl (a, lda, n, ipvt, b, job)
subroutine	dgeco (a, lda, n, ipvt, rcond, z)
subroutine	dgefa (a, lda, n, ipvt, info)
double precision function	dasum (n, dx, incx)
	dasum
subroutine	daxpy (n, da, dx, incx, dy, incy)
double precision function	ddot (n, dx, incx, dy, incy)
subroutine	dscal (n, da, dx, incx)
	dscal
integer function	idamax (n, dx, incx)
	idamax

Function/Subroutine Documentation

dasum()

double precision function dasum	(	integer	n,
		double precision, dimension(*)	dx,
		integer	incx
	)

dasum

Here is the call graph for this function:

daxpy()

subroutine daxpy	(	integer	n,
		double precision	da,
		double precision, dimension(*)	dx,
		integer	incx,
		double precision, dimension(*)	dy,
		integer	incy
	)

ddot()

double precision function ddot	(	integer	n,
		double precision, dimension(*)	dx,
		integer	incx,
		double precision, dimension(*)	dy,
		integer	incy
	)

Here is the call graph for this function:

dgeco()

subroutine dgeco	(	real ( kind = 8 ), dimension(lda,n)	a,
		integer ( kind = 4 )	lda,
		integer ( kind = 4 )	n,
		integer ( kind = 4 ), dimension(n)	ipvt,
		real ( kind = 8 )	rcond,
		real ( kind = 8 ), dimension(n)	z
	)

Here is the call graph for this function:

dgefa()

subroutine dgefa	(	real ( kind = 8 ), dimension(lda,n)	a,
		integer ( kind = 4 )	lda,
		integer ( kind = 4 )	n,
		integer ( kind = 4 ), dimension(n)	ipvt,
		integer ( kind = 4 )	info
	)

dgesl()

subroutine dgesl	(	real ( kind = 8 ), dimension(lda,n)	a,
		integer ( kind = 4 )	lda,
		integer ( kind = 4 )	n,
		integer ( kind = 4 ), dimension(n)	ipvt,
		real ( kind = 8 ), dimension(n)	b,
		integer ( kind = 4 )	job
	)

dscal()

subroutine dscal	(	integer	n,
		double precision	da,
		double precision, dimension(*)	dx,
		integer	incx
	)

dscal

idamax()

integer function idamax	(	integer	n,
		double precision, dimension(*)	dx,
		integer	incx
	)

idamax

Here is the call graph for this function:

lsolve()

subroutine lsolve	(	real ( kind=8 ), dimension ( nsite, nsite )	a,
		integer, intent(in)	nsite,
		real ( kind=8 ), dimension ( nsite ), intent(out)	q_tmp
	)

lsolve, AX = B

Here is the call graph for this function: