orthogonalize_against_basis Interface

public interface orthogonalize_against_basis

Module Procedures

private subroutine orthogonalize_vector_against_basis_rsp(y, X, info, if_chk_orthonormal, beta)

Orthogonalizes the abstract_vector y against a basis X of abstract_vector.

Arguments

Type IntentOptional Attributes Name
class(abstract_vector_rsp), intent(inout) :: y

Input abstract_vector to orthogonalize

class(abstract_vector_rsp), intent(in) :: X(:)

Input abstract_vector basis to orthogonalize against

integer, intent(out) :: info

Information flag.

logical, intent(in), optional :: if_chk_orthonormal
real(kind=sp), intent(out), optional :: beta(:)

Projection coefficients if requested

private subroutine orthogonalize_basis_against_basis_rsp(Y, X, info, if_chk_orthonormal, beta)

Orthogonalizes the abstract_vector basis Y against a basis X of abstract_vector.

Arguments

Type IntentOptional Attributes Name
class(abstract_vector_rsp), intent(inout) :: Y(:)

Input abstract_vector basis to orthogonalize

class(abstract_vector_rsp), intent(in) :: X(:)

Input abstract_vector basis to orthogonalize against

integer, intent(out) :: info

Information flag.

logical, intent(in), optional :: if_chk_orthonormal
real(kind=sp), intent(out), optional :: beta(:,:)

Projection coefficients if requested

private subroutine orthogonalize_vector_against_basis_rdp(y, X, info, if_chk_orthonormal, beta)

Orthogonalizes the abstract_vector y against a basis X of abstract_vector.

Arguments

Type IntentOptional Attributes Name
class(abstract_vector_rdp), intent(inout) :: y

Input abstract_vector to orthogonalize

class(abstract_vector_rdp), intent(in) :: X(:)

Input abstract_vector basis to orthogonalize against

integer, intent(out) :: info

Information flag.

logical, intent(in), optional :: if_chk_orthonormal
real(kind=dp), intent(out), optional :: beta(:)

Projection coefficients if requested

private subroutine orthogonalize_basis_against_basis_rdp(Y, X, info, if_chk_orthonormal, beta)

Orthogonalizes the abstract_vector basis Y against a basis X of abstract_vector.

Arguments

Type IntentOptional Attributes Name
class(abstract_vector_rdp), intent(inout) :: Y(:)

Input abstract_vector basis to orthogonalize

class(abstract_vector_rdp), intent(in) :: X(:)

Input abstract_vector basis to orthogonalize against

integer, intent(out) :: info

Information flag.

logical, intent(in), optional :: if_chk_orthonormal
real(kind=dp), intent(out), optional :: beta(:,:)

Projection coefficients if requested

private subroutine orthogonalize_vector_against_basis_csp(y, X, info, if_chk_orthonormal, beta)

Orthogonalizes the abstract_vector y against a basis X of abstract_vector.

Arguments

Type IntentOptional Attributes Name
class(abstract_vector_csp), intent(inout) :: y

Input abstract_vector to orthogonalize

class(abstract_vector_csp), intent(in) :: X(:)

Input abstract_vector basis to orthogonalize against

integer, intent(out) :: info

Information flag.

logical, intent(in), optional :: if_chk_orthonormal
complex(kind=sp), intent(out), optional :: beta(:)

Projection coefficients if requested

private subroutine orthogonalize_basis_against_basis_csp(Y, X, info, if_chk_orthonormal, beta)

Orthogonalizes the abstract_vector basis Y against a basis X of abstract_vector.

Arguments

Type IntentOptional Attributes Name
class(abstract_vector_csp), intent(inout) :: Y(:)

Input abstract_vector basis to orthogonalize

class(abstract_vector_csp), intent(in) :: X(:)

Input abstract_vector basis to orthogonalize against

integer, intent(out) :: info

Information flag.

logical, intent(in), optional :: if_chk_orthonormal
complex(kind=sp), intent(out), optional :: beta(:,:)

Projection coefficients if requested

private subroutine orthogonalize_vector_against_basis_cdp(y, X, info, if_chk_orthonormal, beta)

Orthogonalizes the abstract_vector y against a basis X of abstract_vector.

Arguments

Type IntentOptional Attributes Name
class(abstract_vector_cdp), intent(inout) :: y

Input abstract_vector to orthogonalize

class(abstract_vector_cdp), intent(in) :: X(:)

Input abstract_vector basis to orthogonalize against

integer, intent(out) :: info

Information flag.

logical, intent(in), optional :: if_chk_orthonormal
complex(kind=dp), intent(out), optional :: beta(:)

Projection coefficients if requested

private subroutine orthogonalize_basis_against_basis_cdp(Y, X, info, if_chk_orthonormal, beta)

Orthogonalizes the abstract_vector basis Y against a basis X of abstract_vector.

Arguments

Type IntentOptional Attributes Name
class(abstract_vector_cdp), intent(inout) :: Y(:)

Input abstract_vector basis to orthogonalize

class(abstract_vector_cdp), intent(in) :: X(:)

Input abstract_vector basis to orthogonalize against

integer, intent(out) :: info

Information flag.

logical, intent(in), optional :: if_chk_orthonormal
complex(kind=dp), intent(out), optional :: beta(:,:)

Projection coefficients if requested