m_fstr_eig_lanczos Module Reference

Lanczos iteration calculation. More...

Functions/Subroutines
subroutine	fstr_solve_lanczos (hecMESH, hecMAT, fstrSOLID, fstrEIG)
	SOLVE EIGENVALUE PROBLEM. More...

Detailed Description

Lanczos iteration calculation.

Function/Subroutine Documentation

fstr_solve_lanczos()

subroutine m_fstr_eig_lanczos::fstr_solve_lanczos	(	type(hecmwst_local_mesh)	hecMESH,
		type(hecmwst_matrix)	hecMAT,
		type(fstr_solid)	fstrSOLID,
		type(fstr_eigen)	fstrEIG
	)

SOLVE EIGENVALUE PROBLEM.

q = A^{-1} p

t = t - beta * q_{i-1} alpha = p * t

t = t - alpha * q_i

re-orthogonalization

beta = || {t}^t [M] {t} ||_2

p = s / beta q = t / beta

Definition at line 11 of file fstr_EIG_lanczos.f90.

Here is the call graph for this function:

Here is the caller graph for this function: