kron Interface

public interface kron

Module Procedures

private function i_kronecker_product(A, B) result(AxB)

Arguments

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

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

private function d_kronecker_product(A, B) result(AxB)

Arguments

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

Return Value real(kind=8), (size(A,1)*size(B,1),size(A,2)*size(B,2))

private function dc_kronecker_product(A, B) result(AxB)

Arguments

Type IntentOptional Attributes Name
real(kind=8), intent(in) :: A(:,:)
complex(kind=8), intent(in) :: B(:,:)

Return Value complex(kind=8), (size(A,1)*size(B,1),size(A,2)*size(B,2))

private function cd_kronecker_product(A, B) result(AxB)

Arguments

Type IntentOptional Attributes Name
complex(kind=8), intent(in) :: A(:,:)
real(kind=8), intent(in) :: B(:,:)

Return Value complex(kind=8), (size(A,1)*size(B,1),size(A,2)*size(B,2))

private function c_kronecker_product(A, B) result(AxB)

Arguments

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

Return Value complex(kind=8), (size(A,1)*size(B,1),size(A,2)*size(B,2))