get_residual Function

private function get_residual(amat_band, bmat_band, eigenvalue, eigenvector)

Arguments

Type	Intent	Optional	Attributes		Name
type(banded_matrix_t),	intent(in)			::	amat_band	the matrix A in banded form
type(banded_matrix_t),	intent(in)			::	bmat_band	the matrix B in banded form
complex(kind=dp),	intent(in)			::	eigenvalue	the eigenvalue
complex(kind=dp),	intent(in)			::	eigenvector(:)	the eigenvector

Return Value real(kind=dp)