m_block_lanczos

namespace m_block_lanczos

Carry on the lanczos procedure for ARTn Algorithm.

Author

Matic Poberznik, Miha Gunde, Nicolas Salles, Antoine Jay

Functions

subroutine, public reset_lanczos_params ()

reset lanczos parameter for the next lanczos step

subroutine, public destroy_lanczos ()

Deallocate lanzcos’s arrays.

Variables

integer, save, public ilanc   = 0

global, current lanczos iteration step

real(dp), save, public, protected a1   = 0.0_DP

dot product between previous and actual min lanczos vector

real(dp), save old_lowest_eigval   = NAN_REAL

eigenvalue of the last lanczos computation

real(dp), save, public lowest_eigval   = NAN_REAL

current lowest eigenvalue obtained by lanczos

real(dp), dimension(:,:), allocatable, save, public old_lanczos_vec

Store the previous lanczos vec.

real(dp), dimension(:,:), allocatable, save v_in

first lanczos eigenvector

real(dp), dimension(:,:), allocatable force_old

force in the previous step

real(dp), dimension(:,:), allocatable, save h

tridiagonal matrix

real(dp), dimension(:,:,:), allocatable, save vmat

matrix containing the laczos vectors

logical, save have_v1   = .false.

interface block_lanczos

interface lanczos