m_fstr_eig_lanczos_util Module Reference

Functions/Subroutines
subroutine	lanczos_set_initial_value (hecmesh, hecmat, fstreig, eigvec, p, q, beta)
	Initialize Lanczos iterations.
subroutine	evsort (eig, new, neig)
	Sort eigenvalues.
subroutine	urand1 (n, x, shift)

Function/Subroutine Documentation

evsort()

subroutine m_fstr_eig_lanczos_util::evsort	(	real(kind=kreal), dimension(neig)	eig,
		integer(kind=kint), dimension(neig)	new,
		integer(kind=kint)	neig
	)

Sort eigenvalues.

Definition at line 81 of file fstr_EIG_lanczos_util.f90.

Here is the caller graph for this function:

lanczos_set_initial_value()

subroutine m_fstr_eig_lanczos_util::lanczos_set_initial_value	(	type(hecmwst_local_mesh)	hecmesh,
		type(hecmwst_matrix)	hecmat,
		type(fstr_eigen)	fstreig,
		real(kind=kreal), dimension(:, :)	eigvec,
		real(kind=kreal), dimension(:)	p,
		real(kind=kreal), dimension(:), pointer	q,
		real(kind=kreal)	beta
	)

Initialize Lanczos iterations.

shifting

M-orthogonalization

Definition at line 10 of file fstr_EIG_lanczos_util.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

urand1()

subroutine m_fstr_eig_lanczos_util::urand1	(	integer(kind=kint)	n,
		real(kind=kreal), dimension(n)	x,
		integer(kind=kint)	shift
	)

Definition at line 108 of file fstr_EIG_lanczos_util.f90.

Here is the caller graph for this function: