GEMM Interface

public interface GEMM

Called by

Help

Module Procedures

private subroutine GEMM_SP(TRANSA, TRANSB, M, N, K, ALPHA, A, LDA, B, LDB, BETA, C, LDC)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=1),	intent(in)			::	TRANSA
character(len=1),	intent(in)			::	TRANSB
integer(kind=JPIM),	intent(in)			::	M
integer(kind=JPIM),	intent(in)			::	N
integer(kind=JPIM),	intent(in)			::	K
real(kind=JPRM),	intent(in)			::	ALPHA
real(kind=JPRM),	intent(in)			::	A(LDA,*)
integer(kind=JPIM),	intent(in)			::	LDA
real(kind=JPRM),	intent(in)			::	B(LDB,*)
integer(kind=JPIM),	intent(in)			::	LDB
real(kind=JPRM),	intent(in)			::	BETA
real(kind=JPRM),	intent(inout)			::	C(LDC,*)
integer(kind=JPIM),	intent(in)			::	LDC

private subroutine GEMM_SP_DP(TRANSA, TRANSB, M, N, K, ALPHA, A, LDA, B, LDB, BETA, C, LDC)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=1),	intent(in)			::	TRANSA
character(len=1),	intent(in)			::	TRANSB
integer(kind=JPIM),	intent(in)			::	M
integer(kind=JPIM),	intent(in)			::	N
integer(kind=JPIM),	intent(in)			::	K
real(kind=JPRD),	intent(in)			::	ALPHA
real(kind=JPRM),	intent(in)			::	A(LDA,*)
integer(kind=JPIM),	intent(in)			::	LDA
real(kind=JPRM),	intent(in)			::	B(LDB,*)
integer(kind=JPIM),	intent(in)			::	LDB
real(kind=JPRD),	intent(in)			::	BETA
real(kind=JPRM),	intent(inout)			::	C(LDC,*)
integer(kind=JPIM),	intent(in)			::	LDC

private subroutine GEMM_SCAL_SP(TRANSA, TRANSB, M, N, K, ALPHA, A, LDA, B, LDB, BETA, C, LDC)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=1),	intent(in)			::	TRANSA
character(len=1),	intent(in)			::	TRANSB
integer(kind=JPIM),	intent(in)			::	M
integer(kind=JPIM),	intent(in)			::	N
integer(kind=JPIM),	intent(in)			::	K
real(kind=JPRM),	intent(in)			::	ALPHA
real(kind=JPRM),	intent(in)			::	A
integer(kind=JPIM),	intent(in)			::	LDA
real(kind=JPRM),	intent(in)			::	B
integer(kind=JPIM),	intent(in)			::	LDB
real(kind=JPRM),	intent(in)			::	BETA
real(kind=JPRM),	intent(inout)			::	C
integer(kind=JPIM),	intent(in)			::	LDC

private subroutine GEMM_SCAL_SP_DP(TRANSA, TRANSB, M, N, K, ALPHA, A, LDA, B, LDB, BETA, C, LDC)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=1),	intent(in)			::	TRANSA
character(len=1),	intent(in)			::	TRANSB
integer(kind=JPIM),	intent(in)			::	M
integer(kind=JPIM),	intent(in)			::	N
integer(kind=JPIM),	intent(in)			::	K
real(kind=JPRD),	intent(in)			::	ALPHA
real(kind=JPRM),	intent(in)			::	A
integer(kind=JPIM),	intent(in)			::	LDA
real(kind=JPRM),	intent(in)			::	B
integer(kind=JPIM),	intent(in)			::	LDB
real(kind=JPRD),	intent(in)			::	BETA
real(kind=JPRM),	intent(inout)			::	C
integer(kind=JPIM),	intent(in)			::	LDC

private subroutine GEMM_DP(TRANSA, TRANSB, M, N, K, ALPHA, A, LDA, B, LDB, BETA, C, LDC)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=1),	intent(in)			::	TRANSA
character(len=1),	intent(in)			::	TRANSB
integer(kind=JPIM),	intent(in)			::	M
integer(kind=JPIM),	intent(in)			::	N
integer(kind=JPIM),	intent(in)			::	K
real(kind=JPRD),	intent(in)			::	ALPHA
real(kind=JPRD),	intent(in)			::	A(LDA,*)
integer(kind=JPIM),	intent(in)			::	LDA
real(kind=JPRD),	intent(in)			::	B(LDB,*)
integer(kind=JPIM),	intent(in)			::	LDB
real(kind=JPRD),	intent(in)			::	BETA
real(kind=JPRD),	intent(inout)			::	C(LDC,*)
integer(kind=JPIM),	intent(in)			::	LDC

private subroutine GEMM_DP_SP(TRANSA, TRANSB, M, N, K, ALPHA, A, LDA, B, LDB, BETA, C, LDC)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=1),	intent(in)			::	TRANSA
character(len=1),	intent(in)			::	TRANSB
integer(kind=JPIM),	intent(in)			::	M
integer(kind=JPIM),	intent(in)			::	N
integer(kind=JPIM),	intent(in)			::	K
real(kind=JPRM),	intent(in)			::	ALPHA
real(kind=JPRD),	intent(in)			::	A(LDA,*)
integer(kind=JPIM),	intent(in)			::	LDA
real(kind=JPRD),	intent(in)			::	B(LDB,*)
integer(kind=JPIM),	intent(in)			::	LDB
real(kind=JPRM),	intent(in)			::	BETA
real(kind=JPRD),	intent(inout)			::	C(LDC,*)
integer(kind=JPIM),	intent(in)			::	LDC

private subroutine GEMM_SCAL_DP(TRANSA, TRANSB, M, N, K, ALPHA, A, LDA, B, LDB, BETA, C, LDC)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=1),	intent(in)			::	TRANSA
character(len=1),	intent(in)			::	TRANSB
integer(kind=JPIM),	intent(in)			::	M
integer(kind=JPIM),	intent(in)			::	N
integer(kind=JPIM),	intent(in)			::	K
real(kind=JPRD),	intent(in)			::	ALPHA
real(kind=JPRD),	intent(in)			::	A
integer(kind=JPIM),	intent(in)			::	LDA
real(kind=JPRD),	intent(in)			::	B
integer(kind=JPIM),	intent(in)			::	LDB
real(kind=JPRD),	intent(in)			::	BETA
real(kind=JPRD),	intent(inout)			::	C
integer(kind=JPIM),	intent(in)			::	LDC

private subroutine GEMM_SCAL_DP_SP(TRANSA, TRANSB, M, N, K, ALPHA, A, LDA, B, LDB, BETA, C, LDC)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=1),	intent(in)			::	TRANSA
character(len=1),	intent(in)			::	TRANSB
integer(kind=JPIM),	intent(in)			::	M
integer(kind=JPIM),	intent(in)			::	N
integer(kind=JPIM),	intent(in)			::	K
real(kind=JPRM),	intent(in)			::	ALPHA
real(kind=JPRD),	intent(in)			::	A
integer(kind=JPIM),	intent(in)			::	LDA
real(kind=JPRD),	intent(in)			::	B
integer(kind=JPIM),	intent(in)			::	LDB
real(kind=JPRM),	intent(in)			::	BETA
real(kind=JPRD),	intent(inout)			::	C
integer(kind=JPIM),	intent(in)			::	LDC