![]() |
FrontISTR 5.2.0
Large-scale structural analysis program with finit element method
|
Lanczos iteration calculation. More...
Functions/Subroutines | |
subroutine | fstr_solve_lanczos (hecmesh, hecmat, fstrsolid, fstreig) |
SOLVE EIGENVALUE PROBLEM. | |
Lanczos iteration calculation.
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 10 of file fstr_EIG_lanczos.f90.