is_orthonormal Interface

public interface is_orthonormal

Description

Utility function returning a logical .true. if the set of vectors stored in form an orthonormal set of vectors and .false. otherwise.

Syntax

    out = is_orthonormal(X)

Arguments

X : Array of derived types extended from the base types provided in the AbstractVectors module.


Module Procedures

private function is_orthonormal_rsp(X) result(ortho)

Arguments

Type IntentOptional Attributes Name
class(abstract_vector_rsp), intent(in) :: X(:)

Return Value logical

private function is_orthonormal_rdp(X) result(ortho)

Arguments

Type IntentOptional Attributes Name
class(abstract_vector_rdp), intent(in) :: X(:)

Return Value logical

private function is_orthonormal_csp(X) result(ortho)

Arguments

Type IntentOptional Attributes Name
class(abstract_vector_csp), intent(in) :: X(:)

Return Value logical

private function is_orthonormal_cdp(X) result(ortho)

Arguments

Type IntentOptional Attributes Name
class(abstract_vector_cdp), intent(in) :: X(:)

Return Value logical