nwtc_lapack::lapack_gemm Interface Reference

Computes scalar1*op( A )*op( B ) + scalar2*C where op(x) = x or op(x) = x**T for matrices A, B, and C. More...

Public Member Functions
subroutine	lapack_dgemm (TRANSA, TRANSB, ALPHA, A, B, BETA, C, ErrStat, ErrMsg)
	general matrix multiply: computes C = alpha*op( A )*op( B ) + beta*C where op(x) = x or op(x) = x**T for matrices A, B, and C use LAPACK_GEMM (nwtc_lapack::lapack_gemm) instead of this specific function. More...
subroutine	lapack_sgemm (TRANSA, TRANSB, ALPHA, A, B, BETA, C, ErrStat, ErrMsg)
	general matrix multiply: computes C = alpha*op( A )*op( B ) + beta*C where op(x) = x or op(x) = x**T for matrices A, B, and C use LAPACK_GEMM (nwtc_lapack::lapack_gemm) instead of this specific function. More...

Detailed Description

Computes scalar1*op( A )*op( B ) + scalar2*C where op(x) = x or op(x) = x**T for matrices A, B, and C.

Member Function/Subroutine Documentation

lapack_dgemm()

subroutine nwtc_lapack::lapack_gemm::lapack_dgemm	(	character(1), intent(in)	TRANSA,
		character(1), intent(in)	TRANSB,
		real(r8ki), intent(in)	ALPHA,
		real(r8ki), dimension( :, : ), intent(in)	A,
		real(r8ki), dimension( :, : ), intent(in)	B,
		real(r8ki), intent(in)	BETA,
		real(r8ki), dimension( :, : ), intent(inout)	C,
		integer(intki), intent(out)	ErrStat,
		character(*), intent(out)	ErrMsg
	)

general matrix multiply: computes C = alpha*op( A )*op( B ) + beta*C where op(x) = x or op(x) = x**T for matrices A, B, and C use LAPACK_GEMM (nwtc_lapack::lapack_gemm) instead of this specific function.

Parameters

[in]	transa	On entry, TRANSA specifies the form of op( A ) to be used in the matrix multiplication as follows: TRANSA = 'N' or 'n', op( A ) = A. TRANSA = 'T' or 't', op( A ) = A**T.
[in]	transb	On entry, TRANSB specifies the form of op( A ) to be used in the matrix multiplication as follows: TRANSB = 'N' or 'n', op( B ) = B. TRANSB = 'T' or 't', op( B ) = B**T.
[in]	alpha	On entry, ALPHA specifies the scalar alpha.
[in]	beta	On entry, BETA specifies the scalar beta. When BETA is supplied as zero then C need not be set on input.
[in]	a	Matrix A
[in]	b	Matrix B
[in,out]	c	Matrix C: Before entry, C must contain the matrix C, except when beta is zero, in which case C need not be set on entry. On exit, the array C is overwritten by the m by n matrix ( alpha*op( A )*op( B ) + beta*C ).
[out]	errstat	Error level
[out]	errmsg	Message describing error

lapack_sgemm()

subroutine nwtc_lapack::lapack_gemm::lapack_sgemm	(	character(1), intent(in)	TRANSA,
		character(1), intent(in)	TRANSB,
		real(siki), intent(in)	ALPHA,
		real(siki), dimension( :, : ), intent(in)	A,
		real(siki), dimension( :, : ), intent(in)	B,
		real(siki), intent(in)	BETA,
		real(siki), dimension( :, : ), intent(inout)	C,
		integer(intki), intent(out)	ErrStat,
		character(*), intent(out)	ErrMsg
	)

general matrix multiply: computes C = alpha*op( A )*op( B ) + beta*C where op(x) = x or op(x) = x**T for matrices A, B, and C use LAPACK_GEMM (nwtc_lapack::lapack_gemm) instead of this specific function.

Parameters

[in]	transa	On entry, TRANSA specifies the form of op( A ) to be used in the matrix multiplication as follows: TRANSA = 'N' or 'n', op( A ) = A. TRANSA = 'T' or 't', op( A ) = A**T.
[in]	transb	On entry, TRANSB specifies the form of op( A ) to be used in the matrix multiplication as follows: TRANSB = 'N' or 'n', op( B ) = B. TRANSB = 'T' or 't', op( B ) = B**T.
[in]	alpha	On entry, ALPHA specifies the scalar alpha.
[in]	beta	On entry, BETA specifies the scalar beta. When BETA is supplied as zero then C need not be set on input.
[in]	a	Matrix A
[in]	b	Matrix B
[in,out]	c	Matrix C: Before entry, C must contain the matrix C, except when beta is zero, in which case C need not be set on entry. On exit, the array C is overwritten by the m by n matrix ( alpha*op( A )*op( B ) + beta*C ).
[out]	errstat	Error level
[out]	errmsg	Message describing error

---

The documentation for this interface was generated from the following file:

• NWTC_LAPACK.f90