DotMatrix Interface

public interface DotMatrix

Contents

Module Procedures


Module Procedures

private pure subroutine DotMatrix_lsr(matA, matB, product)

Product = sum(MatA[ij]*MatB[ij])

Arguments

Type IntentOptional Attributes Name
type(Matrix_lsr), intent(in) :: matA

Matrix A.
type(Matrix_lsr), intent(in) :: matB

Matrix B.
real(kind=NTREAL), intent(out) :: product

Dot product.

private pure subroutine DotMatrix_lsc(matA, matB, product)

Product = sum(MatA^H[ij]*MatB[ij])

Arguments

Type IntentOptional Attributes Name
type(Matrix_lsc), intent(in) :: matA

Matrix A.
type(Matrix_lsc), intent(in) :: matB

Matrix B.
complex(kind=NTCOMPLEX), intent(out) :: product

Dot product.