adjoint Interface

public interface adjoint

Module Procedures

private pure module function adjoint_i(A) result(res)

Returns the adjoint of an integer-valued matrix

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: A(:,:)

Return Value integer, (size(A,2),size(A,1))

private pure module function adjoint_r(A) result(res)

Returns the adjoint of a real-valued matrix

Arguments

Type IntentOptional Attributes Name
real(kind=dp), intent(in) :: A(:,:)

Return Value real(kind=dp), (size(A,2),size(A,1))

private pure module function adjoint_c(A) result(res)

Returns the adjoint of a complex-valued matrix

Arguments

Type IntentOptional Attributes Name
complex(kind=dp), intent(in) :: A(:,:)

Return Value complex(kind=dp), (size(A,2),size(A,1))