sp_lanc_tridiag Interface

public interface sp_lanc_tridiag

Module Procedures

private subroutine lanczos_tridiag_d(MatVec, vin, alanc, blanc, threshold)

Arguments

Type IntentOptional Attributes Name
private subroutine MatVec(Nloc, vin, vout)
Arguments
Type IntentOptional Attributes Name
integer :: Nloc
real(kind=8), dimension(Nloc) :: vin
real(kind=8), dimension(Nloc) :: vout
real(kind=8), intent(inout), dimension(:) :: vin
real(kind=8), intent(inout), dimension(:) :: alanc
real(kind=8), intent(inout), dimension(size(alanc)) :: blanc
real(kind=8), optional :: threshold

private subroutine lanczos_tridiag_c(MatVec, vin, alanc, blanc, threshold)

Arguments

Type IntentOptional Attributes Name
private subroutine MatVec(Nloc, vin, vout)
Arguments
Type IntentOptional Attributes Name
integer :: Nloc
complex(kind=8), dimension(Nloc) :: vin
complex(kind=8), dimension(Nloc) :: vout
complex(kind=8), intent(inout), dimension(:) :: vin
real(kind=8), intent(inout), dimension(:) :: alanc
real(kind=8), intent(inout), dimension(size(alanc)) :: blanc
real(kind=8), optional :: threshold

private subroutine mpi_lanczos_tridiag_d(MpiComm, MatVec, vin, alanc, blanc, threshold)

Arguments

Type IntentOptional Attributes Name
integer :: MpiComm
private subroutine MatVec(Nloc, vin, vout)
Arguments
Type IntentOptional Attributes Name
integer :: Nloc
real(kind=8), dimension(Nloc) :: vin
real(kind=8), dimension(Nloc) :: vout
real(kind=8), intent(inout), dimension(:) :: vin
real(kind=8), intent(inout), dimension(:) :: alanc
real(kind=8), intent(inout), dimension(size(alanc)) :: blanc
real(kind=8), optional :: threshold

private subroutine mpi_lanczos_tridiag_c(MpiComm, MatVec, vin, alanc, blanc, threshold)

Arguments

Type IntentOptional Attributes Name
integer :: MpiComm
private subroutine MatVec(Nloc, vin, vout)
Arguments
Type IntentOptional Attributes Name
integer :: Nloc
complex(kind=8), dimension(Nloc) :: vin
complex(kind=8), dimension(Nloc) :: vout
complex(kind=8), intent(inout), dimension(:) :: vin
real(kind=8), intent(inout), dimension(:) :: alanc
real(kind=8), intent(inout), dimension(size(alanc)) :: blanc
real(kind=8), optional :: threshold