stdlib_linalg_blas – Fortran-lang/stdlib

公共接口 axpy

AXPY 常数乘以向量加上向量。

公共纯子程序 caxpy(n, ca, cx, incx, cy, incy)

参数

类型	意图		名称
integer(kind=ilp),	intent(in)	::	n
complex(kind=sp),	intent(in)	::	ca
complex(kind=sp),	intent(in)	::	cx(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=sp),	intent(inout)	::	cy(*)
integer(kind=ilp),	intent(in)	::	incy

公共纯子程序 daxpy(n, da, dx, incx, dy, incy)

参数

类型	意图		名称
integer(kind=ilp),	intent(in)	::	n
real(kind=dp),	intent(in)	::	da
real(kind=dp),	intent(in)	::	dx(*)
integer(kind=ilp),	intent(in)	::	incx
real(kind=dp),	intent(inout)	::	dy(*)
integer(kind=ilp),	intent(in)	::	incy

公共纯子程序 saxpy(n, sa, sx, incx, sy, incy)

参数

类型	意图		名称
integer(kind=ilp),	intent(in)	::	n
real(kind=sp),	intent(in)	::	sa
real(kind=sp),	intent(in)	::	sx(*)
integer(kind=ilp),	intent(in)	::	incx
real(kind=sp),	intent(inout)	::	sy(*)
integer(kind=ilp),	intent(in)	::	incy

公共纯子程序 zaxpy(n, za, zx, incx, zy, incy)

参数

类型	意图		名称
integer(kind=ilp),	intent(in)	::	n
complex(kind=dp),	intent(in)	::	za
complex(kind=dp),	intent(in)	::	zx(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=dp),	intent(inout)	::	zy(*)
integer(kind=ilp),	intent(in)	::	incy

公共纯子程序 stdlib_caxpy(n, ca, cx, incx, cy, incy)

CAXPY 常数乘以向量加上向量。

参数

类型	意图		名称
integer(kind=ilp),	intent(in)	::	n
complex(kind=sp),	intent(in)	::	ca
complex(kind=sp),	intent(in)	::	cx(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=sp),	intent(inout)	::	cy(*)
integer(kind=ilp),	intent(in)	::	incy

公共纯子程序 stdlib_daxpy(n, da, dx, incx, dy, incy)

DAXPY 常数乘以向量加上向量。对于增量等于 1，使用展开循环。

参数

类型	意图		名称
integer(kind=ilp),	intent(in)	::	n
real(kind=dp),	intent(in)	::	da
real(kind=dp),	intent(in)	::	dx(*)
integer(kind=ilp),	intent(in)	::	incx
real(kind=dp),	intent(inout)	::	dy(*)
integer(kind=ilp),	intent(in)	::	incy

公共纯子程序 stdlib_saxpy(n, sa, sx, incx, sy, incy)

SAXPY 常数乘以向量加上向量。对于增量等于 1，使用展开循环。

参数

类型	意图		名称
integer(kind=ilp),	intent(in)	::	n
real(kind=sp),	intent(in)	::	sa
real(kind=sp),	intent(in)	::	sx(*)
integer(kind=ilp),	intent(in)	::	incx
real(kind=sp),	intent(inout)	::	sy(*)
integer(kind=ilp),	intent(in)	::	incy

公共纯子程序 stdlib_zaxpy(n, za, zx, incx, zy, incy)

ZAXPY 常数乘以向量加上向量。

参数

类型	意图		名称
integer(kind=ilp),	intent(in)	::	n
complex(kind=dp),	intent(in)	::	za
complex(kind=dp),	intent(in)	::	zx(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=dp),	intent(inout)	::	zy(*)
integer(kind=ilp),	intent(in)	::	incy

公共接口 copy

COPY 将向量 x 复制到向量 y。

公共纯子程序 ccopy(n, cx, incx, cy, incy)

参数

类型	意图		名称
integer(kind=ilp),	intent(in)	::	n
complex(kind=sp),	intent(in)	::	cx(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=sp),	intent(out)	::	cy(*)
integer(kind=ilp),	intent(in)	::	incy

公共纯子程序 dcopy(n, dx, incx, dy, incy)

参数

类型	意图		名称
integer(kind=ilp),	intent(in)	::	n
real(kind=dp),	intent(in)	::	dx(*)
integer(kind=ilp),	intent(in)	::	incx
real(kind=dp),	intent(out)	::	dy(*)
integer(kind=ilp),	intent(in)	::	incy

公共纯子程序 scopy(n, sx, incx, sy, incy)

参数

类型	意图		名称
integer(kind=ilp),	intent(in)	::	n
real(kind=sp),	intent(in)	::	sx(*)
integer(kind=ilp),	intent(in)	::	incx
real(kind=sp),	intent(out)	::	sy(*)
integer(kind=ilp),	intent(in)	::	incy

公共纯子程序 zcopy(n, zx, incx, zy, incy)

参数

类型	意图		名称
integer(kind=ilp),	intent(in)	::	n
complex(kind=dp),	intent(in)	::	zx(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=dp),	intent(out)	::	zy(*)
integer(kind=ilp),	intent(in)	::	incy

公共纯子程序 stdlib_ccopy(n, cx, incx, cy, incy)

CCOPY 将向量 x 复制到向量 y。

参数

类型	意图		名称
integer(kind=ilp),	intent(in)	::	n
complex(kind=sp),	intent(in)	::	cx(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=sp),	intent(out)	::	cy(*)
integer(kind=ilp),	intent(in)	::	incy

公共纯子程序 stdlib_dcopy(n, dx, incx, dy, incy)

DCOPY 将向量 x 复制到向量 y。对于增量等于 1，使用展开循环。

参数

类型	意图		名称
integer(kind=ilp),	intent(in)	::	n
real(kind=dp),	intent(in)	::	dx(*)
integer(kind=ilp),	intent(in)	::	incx
real(kind=dp),	intent(out)	::	dy(*)
integer(kind=ilp),	intent(in)	::	incy

公共纯子程序 stdlib_scopy(n, sx, incx, sy, incy)

SCOPY 将向量 x 复制到向量 y。对于增量等于 1，使用展开循环。

参数

类型	意图		名称
integer(kind=ilp),	intent(in)	::	n
real(kind=sp),	intent(in)	::	sx(*)
integer(kind=ilp),	intent(in)	::	incx
real(kind=sp),	intent(out)	::	sy(*)
integer(kind=ilp),	intent(in)	::	incy

公共纯子程序 stdlib_zcopy(n, zx, incx, zy, incy)

ZCOPY 将向量 x 复制到向量 y。

参数

类型	意图		名称
integer(kind=ilp),	intent(in)	::	n
complex(kind=dp),	intent(in)	::	zx(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=dp),	intent(out)	::	zy(*)
integer(kind=ilp),	intent(in)	::	incy

公共接口 dot

DOT 形成两个向量的点积。对于增量等于 1，使用展开循环。

公共纯函数 ddot(n, dx, incx, dy, incy)

参数

类型	意图		名称
integer(kind=ilp),	intent(in)	::	n
real(kind=dp),	intent(in)	::	dx(*)
integer(kind=ilp),	intent(in)	::	incx
real(kind=dp),	intent(in)	::	dy(*)
integer(kind=ilp),	intent(in)	::	incy

返回值 real(kind=dp)

公共纯函数 sdot(n, sx, incx, sy, incy)

参数

类型	意图		名称
integer(kind=ilp),	intent(in)	::	n
real(kind=sp),	intent(in)	::	sx(*)
integer(kind=ilp),	intent(in)	::	incx
real(kind=sp),	intent(in)	::	sy(*)
integer(kind=ilp),	intent(in)	::	incy

返回值 real(kind=sp)

公共纯函数 stdlib_ddot(n, dx, incx, dy, incy)

DDOT 形成两个向量的点积。对于增量等于 1，使用展开循环。

参数

类型	意图		名称
integer(kind=ilp),	intent(in)	::	n
real(kind=dp),	intent(in)	::	dx(*)
integer(kind=ilp),	intent(in)	::	incx
real(kind=dp),	intent(in)	::	dy(*)
integer(kind=ilp),	intent(in)	::	incy

返回值 real(kind=dp)

公共纯函数 stdlib_sdot(n, sx, incx, sy, incy)

SDOT 形成两个向量的点积。对于增量等于 1，使用展开循环。

参数

类型	意图		名称
integer(kind=ilp),	intent(in)	::	n
real(kind=sp),	intent(in)	::	sx(*)
integer(kind=ilp),	intent(in)	::	incx
实数(kind=sp),	intent(in)	::	sy(*)
整数(kind=ilp),	intent(in)	::	incy

返回值 real(kind=sp)

公共接口 dotc

DOTC 计算两个复数向量的点积 DOTC = X^H * Y

公共纯函数 cdotc(n, cx, incx, cy, incy)

参数

类型	意图		名称
整数(kind=ilp),	intent(in)	::	n
复数(kind=sp),	intent(in)	::	cx(*)
整数(kind=ilp),	intent(in)	::	incx
复数(kind=sp),	intent(in)	::	cy(*)
整数(kind=ilp),	intent(in)	::	incy

返回值复数(kind=sp)

公共纯函数 zdotc(n, zx, incx, zy, incy)

参数

类型	意图		名称
整数(kind=ilp),	intent(in)	::	n
复数(kind=dp),	intent(in)	::	zx(*)
整数(kind=ilp),	intent(in)	::	incx
复数(kind=dp),	intent(in)	::	zy(*)
整数(kind=ilp),	intent(in)	::	incy

返回值复数(kind=dp)

公共纯函数 stdlib_cdotc(n, cx, incx, cy, incy)

CDOTC 计算两个复数向量的点积 CDOTC = X^H * Y

参数

类型	意图		名称
整数(kind=ilp),	intent(in)	::	n
复数(kind=sp),	intent(in)	::	cx(*)
整数(kind=ilp),	intent(in)	::	incx
复数(kind=sp),	intent(in)	::	cy(*)
整数(kind=ilp),	intent(in)	::	incy

返回值复数(kind=sp)

公共纯函数 stdlib_zdotc(n, zx, incx, zy, incy)

ZDOTC 计算两个复数向量的点积 ZDOTC = X^H * Y

参数

类型	意图		名称
整数(kind=ilp),	intent(in)	::	n
复数(kind=dp),	intent(in)	::	zx(*)
整数(kind=ilp),	intent(in)	::	incx
复数(kind=dp),	intent(in)	::	zy(*)
整数(kind=ilp),	intent(in)	::	incy

返回值复数(kind=dp)

公共接口 dotu

DOTU 计算两个复数向量的点积 DOTU = X^T * Y

公共纯函数 cdotu(n, cx, incx, cy, incy)

参数

类型	意图		名称
整数(kind=ilp),	intent(in)	::	n
复数(kind=sp),	intent(in)	::	cx(*)
整数(kind=ilp),	intent(in)	::	incx
复数(kind=sp),	intent(in)	::	cy(*)
整数(kind=ilp),	intent(in)	::	incy

返回值复数(kind=sp)

公共纯函数 zdotu(n, zx, incx, zy, incy)

参数

类型	意图		名称
整数(kind=ilp),	intent(in)	::	n
复数(kind=dp),	intent(in)	::	zx(*)
整数(kind=ilp),	intent(in)	::	incx
复数(kind=dp),	intent(in)	::	zy(*)
整数(kind=ilp),	intent(in)	::	incy

返回值复数(kind=dp)

公共纯函数 stdlib_cdotu(n, cx, incx, cy, incy)

CDOTU 计算两个复数向量的点积 CDOTU = X^T * Y

参数

类型	意图		名称
整数(kind=ilp),	intent(in)	::	n
复数(kind=sp),	intent(in)	::	cx(*)
整数(kind=ilp),	intent(in)	::	incx
复数(kind=sp),	intent(in)	::	cy(*)
整数(kind=ilp),	intent(in)	::	incy

返回值复数(kind=sp)

公共纯函数 stdlib_zdotu(n, zx, incx, zy, incy)

ZDOTU 计算两个复数向量的点积 ZDOTU = X^T * Y

参数

类型	意图		名称
整数(kind=ilp),	intent(in)	::	n
复数(kind=dp),	intent(in)	::	zx(*)
整数(kind=ilp),	intent(in)	::	incx
复数(kind=dp),	intent(in)	::	zy(*)
整数(kind=ilp),	intent(in)	::	incy

返回值复数(kind=dp)

公共接口 gbmv

GBMV 执行以下矩阵向量运算之一：y := alpha*A*x + beta*y，或 y := alpha*A^T*x + beta*y，或 y := alpha*A^H*x + beta*y，其中 alpha 和 beta 是标量，x 和 y 是向量，A 是一个 m x n 带状矩阵，具有 kl 个次对角线和 ku 个超对角线。

公共纯子程序 cgbmv(trans, m, n, kl, ku, alpha, a, lda, x, incx, beta, y, incy)

参数

类型	意图		名称
字符(len=1),	intent(in)	::	trans
整数(kind=ilp),	intent(in)	::	m
整数(kind=ilp),	intent(in)	::	n
整数(kind=ilp),	intent(in)	::	kl
整数(kind=ilp),	intent(in)	::	ku
复数(kind=sp),	intent(in)	::	alpha
复数(kind=sp),	intent(in)	::	a(lda,* )
整数(kind=ilp),	intent(in)	::	lda
复数(kind=sp),	intent(in)	::	x(*)
整数(kind=ilp),	intent(in)	::	incx
复数(kind=sp),	intent(in)	::	beta
复数(kind=sp),	intent(inout)	::	y(*)
整数(kind=ilp),	intent(in)	::	incy

公共纯子程序 dgbmv(trans, m, n, kl, ku, alpha, a, lda, x, incx, beta, y, incy)

参数

类型	意图		名称
字符(len=1),	intent(in)	::	trans
整数(kind=ilp),	intent(in)	::	m
整数(kind=ilp),	intent(in)	::	n
整数(kind=ilp),	intent(in)	::	kl
整数(kind=ilp),	intent(in)	::	ku
实数(kind=dp),	intent(in)	::	alpha
实数(kind=dp),	intent(in)	::	a(lda,* )
整数(kind=ilp),	intent(in)	::	lda
实数(kind=dp),	intent(in)	::	x(*)
整数(kind=ilp),	intent(in)	::	incx
实数(kind=dp),	intent(in)	::	beta
实数(kind=dp),	intent(inout)	::	y(*)
整数(kind=ilp),	intent(in)	::	incy

公共纯子程序 sgbmv(trans, m, n, kl, ku, alpha, a, lda, x, incx, beta, y, incy)

参数

类型	意图		名称
字符(len=1),	intent(in)	::	trans
整数(kind=ilp),	intent(in)	::	m
整数(kind=ilp),	intent(in)	::	n
整数(kind=ilp),	intent(in)	::	kl
整数(kind=ilp),	intent(in)	::	ku
实数(kind=sp),	intent(in)	::	alpha
实数(kind=sp),	intent(in)	::	a(lda,* )
整数(kind=ilp),	intent(in)	::	lda
实数(kind=sp),	intent(in)	::	x(*)
整数(kind=ilp),	intent(in)	::	incx
实数(kind=sp),	intent(in)	::	beta
实数(kind=sp),	intent(inout)	::	y(*)
整数(kind=ilp),	intent(in)	::	incy

公共纯子程序 zgbmv(trans, m, n, kl, ku, alpha, a, lda, x, incx, beta, y, incy)

参数

类型	意图		名称
字符(len=1),	intent(in)	::	trans
整数(kind=ilp),	intent(in)	::	m
整数(kind=ilp),	intent(in)	::	n
整数(kind=ilp),	intent(in)	::	kl
整数(kind=ilp),	intent(in)	::	ku
复数(kind=dp),	intent(in)	::	alpha
复数(kind=dp),	intent(in)	::	a(lda,* )
整数(kind=ilp),	intent(in)	::	lda
复数(kind=dp),	intent(in)	::	x(*)
整数(kind=ilp),	intent(in)	::	incx
复数(kind=dp),	intent(in)	::	beta
复数(kind=dp),	intent(inout)	::	y(*)
整数(kind=ilp),	intent(in)	::	incy

公共纯子程序 stdlib_cgbmv(trans, m, n, kl, ku, alpha, a, lda, x, incx, beta, y, incy)

CGBMV 执行以下矩阵向量运算之一：y := alpha*A*x + beta*y，或 y := alpha*A^T*x + beta*y，或 y := alpha*A^H*x + beta*y，其中 alpha 和 beta 是标量，x 和 y 是向量，A 是一个 m x n 带状矩阵，具有 kl 个次对角线和 ku 个超对角线。

参数

类型	意图		名称
字符(len=1),	intent(in)	::	trans
整数(kind=ilp),	intent(in)	::	m
整数(kind=ilp),	intent(in)	::	n
整数(kind=ilp),	intent(in)	::	kl
整数(kind=ilp),	intent(in)	::	ku
复数(kind=sp),	intent(in)	::	alpha
复数(kind=sp),	intent(in)	::	a(lda,* )
整数(kind=ilp),	intent(in)	::	lda
复数(kind=sp),	intent(in)	::	x(*)
整数(kind=ilp),	intent(in)	::	incx
复数(kind=sp),	intent(in)	::	beta
复数(kind=sp),	intent(inout)	::	y(*)
整数(kind=ilp),	intent(in)	::	incy

公共纯子程序 stdlib_dgbmv(trans, m, n, kl, ku, alpha, a, lda, x, incx, beta, y, incy)

DGBMV 执行以下矩阵向量运算之一：y := alpha*A*x + beta*y，或 y := alpha*A^T*x + beta*y，其中 alpha 和 beta 是标量，x 和 y 是向量，A 是一个 m x n 带状矩阵，具有 kl 个次对角线和 ku 个超对角线。

参数

类型	意图		名称
字符(len=1),	intent(in)	::	trans
整数(kind=ilp),	intent(in)	::	m
整数(kind=ilp),	intent(in)	::	n
整数(kind=ilp),	intent(in)	::	kl
整数(kind=ilp),	intent(in)	::	ku
实数(kind=dp),	intent(in)	::	alpha
实数(kind=dp),	intent(in)	::	a(lda,* )
整数(kind=ilp),	intent(in)	::	lda
实数(kind=dp),	intent(in)	::	x(*)
整数(kind=ilp),	intent(in)	::	incx
实数(kind=dp),	intent(in)	::	beta
实数(kind=dp),	intent(inout)	::	y(*)
整数(kind=ilp),	intent(in)	::	incy

公共纯子程序 stdlib_sgbmv(trans, m, n, kl, ku, alpha, a, lda, x, incx, beta, y, incy)

SGBMV 执行以下矩阵向量运算之一：y := alpha*A*x + beta*y，或 y := alpha*A^T*x + beta*y，其中 alpha 和 beta 是标量，x 和 y 是向量，A 是一个 m x n 带状矩阵，具有 kl 个次对角线和 ku 个超对角线。

参数

类型	意图		名称
字符(len=1),	intent(in)	::	trans
整数(kind=ilp),	intent(in)	::	m
整数(kind=ilp),	intent(in)	::	n
整数(kind=ilp),	intent(in)	::	kl
整数(kind=ilp),	intent(in)	::	ku
实数(kind=sp),	intent(in)	::	alpha
实数(kind=sp),	intent(in)	::	a(lda,* )
整数(kind=ilp),	intent(in)	::	lda
实数(kind=sp),	intent(in)	::	x(*)
整数(kind=ilp),	intent(in)	::	incx
实数(kind=sp),	intent(in)	::	beta
实数(kind=sp),	intent(inout)	::	y(*)
整数(kind=ilp),	intent(in)	::	incy

公共纯子程序 stdlib_zgbmv(trans, m, n, kl, ku, alpha, a, lda, x, incx, beta, y, incy)

ZGBMV 执行以下矩阵向量运算之一：y := alpha*A*x + beta*y，或 y := alpha*A^T*x + beta*y，或 y := alpha*A^H*x + beta*y，其中 alpha 和 beta 是标量，x 和 y 是向量，A 是一个 m x n 带状矩阵，具有 kl 个次对角线和 ku 个超对角线。

参数

类型	意图		名称
字符(len=1),	intent(in)	::	trans
整数(kind=ilp),	intent(in)	::	m
整数(kind=ilp),	intent(in)	::	n
整数(kind=ilp),	intent(in)	::	kl
整数(kind=ilp),	intent(in)	::	ku
复数(kind=dp),	intent(in)	::	alpha
复数(kind=dp),	intent(in)	::	a(lda,* )
整数(kind=ilp),	intent(in)	::	lda
复数(kind=dp),	intent(in)	::	x(*)
整数(kind=ilp),	intent(in)	::	incx
复数(kind=dp),	intent(in)	::	beta
复数(kind=dp),	intent(inout)	::	y(*)
整数(kind=ilp),	intent(in)	::	incy

公共接口 gemm

GEMM 执行以下矩阵矩阵运算之一：C := alpha*op( A )*op( B ) + beta*C，其中 op( X ) 为 op( X ) = X 或 op( X ) = X^T 或 op( X ) = X^H 之一，alpha 和 beta 是标量，A、B 和 C 是矩阵，其中 op( A ) 是一个 m x k 矩阵，op( B ) 是一个 k x n 矩阵，C 是一个 m x n 矩阵。

公共纯子程序 cgemm(transa, transb, m, n, k, alpha, a, lda, b, ldb, beta, c, ldc)

参数

类型	意图		名称
character(len=1),	intent(in)	::	transa
character(len=1),	intent(in)	::	transb
integer(kind=ilp),	intent(in)	::	m
integer(kind=ilp),	intent(in)	::	n
integer(kind=ilp),	intent(in)	::	k
complex(kind=sp),	intent(in)	::	alpha
complex(kind=sp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
complex(kind=sp),	intent(in)	::	b(ldb,*)
integer(kind=ilp),	intent(in)	::	ldb
complex(kind=sp),	intent(in)	::	beta
complex(kind=sp),	intent(inout)	::	c(ldc,*)
integer(kind=ilp),	intent(in)	::	ldc

公共纯子程序 dgemm(transa, transb, m, n, k, alpha, a, lda, b, ldb, beta, c, ldc)

参数

类型	意图		名称
character(len=1),	intent(in)	::	transa
character(len=1),	intent(in)	::	transb
integer(kind=ilp),	intent(in)	::	m
integer(kind=ilp),	intent(in)	::	n
integer(kind=ilp),	intent(in)	::	k
real(kind=dp),	intent(in)	::	alpha
real(kind=dp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
real(kind=dp),	intent(in)	::	b(ldb,*)
integer(kind=ilp),	intent(in)	::	ldb
real(kind=dp),	intent(in)	::	beta
real(kind=dp),	intent(inout)	::	c(ldc,*)
integer(kind=ilp),	intent(in)	::	ldc

公共纯子程序 sgemm(transa, transb, m, n, k, alpha, a, lda, b, ldb, beta, c, ldc)

参数

类型	意图		名称
character(len=1),	intent(in)	::	transa
character(len=1),	intent(in)	::	transb
integer(kind=ilp),	intent(in)	::	m
integer(kind=ilp),	intent(in)	::	n
integer(kind=ilp),	intent(in)	::	k
real(kind=sp),	intent(in)	::	alpha
real(kind=sp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
real(kind=sp),	intent(in)	::	b(ldb,*)
integer(kind=ilp),	intent(in)	::	ldb
real(kind=sp),	intent(in)	::	beta
real(kind=sp),	intent(inout)	::	c(ldc,*)
integer(kind=ilp),	intent(in)	::	ldc

公共纯子程序 zgemm(transa, transb, m, n, k, alpha, a, lda, b, ldb, beta, c, ldc)

参数

类型	意图		名称
character(len=1),	intent(in)	::	transa
character(len=1),	intent(in)	::	transb
integer(kind=ilp),	intent(in)	::	m
integer(kind=ilp),	intent(in)	::	n
integer(kind=ilp),	intent(in)	::	k
complex(kind=dp),	intent(in)	::	alpha
complex(kind=dp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
complex(kind=dp),	intent(in)	::	b(ldb,*)
integer(kind=ilp),	intent(in)	::	ldb
complex(kind=dp),	intent(in)	::	beta
complex(kind=dp),	intent(inout)	::	c(ldc,*)
integer(kind=ilp),	intent(in)	::	ldc

公共纯子程序 stdlib_cgemm(transa, transb, m, n, k, alpha, a, lda, b, ldb, beta, c, ldc)

CGEMM 执行以下矩阵-矩阵运算之一：C := alphaop( A )op( B ) + betaC，其中 op( X ) 为以下之一：op( X ) = X 或 op( X ) = X*T 或 op( X ) = X**H，alpha 和 beta 为标量，A、B 和 C 为矩阵，其中 op( A ) 为 m x k 矩阵，op( B ) 为 k x n 矩阵，C 为 m x n 矩阵。

参数

类型	意图		名称
character(len=1),	intent(in)	::	transa
character(len=1),	intent(in)	::	transb
integer(kind=ilp),	intent(in)	::	m
integer(kind=ilp),	intent(in)	::	n
integer(kind=ilp),	intent(in)	::	k
complex(kind=sp),	intent(in)	::	alpha
complex(kind=sp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
complex(kind=sp),	intent(in)	::	b(ldb,*)
integer(kind=ilp),	intent(in)	::	ldb
complex(kind=sp),	intent(in)	::	beta
complex(kind=sp),	intent(inout)	::	c(ldc,*)
integer(kind=ilp),	intent(in)	::	ldc

公共纯子程序 stdlib_dgemm(transa, transb, m, n, k, alpha, a, lda, b, ldb, beta, c, ldc)

DGEMM 执行以下矩阵-矩阵运算之一：C := alphaop( A )op( B ) + betaC，其中 op( X ) 为以下之一：op( X ) = X 或 op( X ) = X*T，alpha 和 beta 为标量，A、B 和 C 为矩阵，其中 op( A ) 为 m x k 矩阵，op( B ) 为 k x n 矩阵，C 为 m x n 矩阵。

参数

类型	意图		名称
character(len=1),	intent(in)	::	transa
character(len=1),	intent(in)	::	transb
integer(kind=ilp),	intent(in)	::	m
integer(kind=ilp),	intent(in)	::	n
integer(kind=ilp),	intent(in)	::	k
real(kind=dp),	intent(in)	::	alpha
real(kind=dp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
real(kind=dp),	intent(in)	::	b(ldb,*)
integer(kind=ilp),	intent(in)	::	ldb
real(kind=dp),	intent(in)	::	beta
real(kind=dp),	intent(inout)	::	c(ldc,*)
integer(kind=ilp),	intent(in)	::	ldc

公共纯子程序 stdlib_sgemm(transa, transb, m, n, k, alpha, a, lda, b, ldb, beta, c, ldc)

SGEMM 执行以下矩阵-矩阵运算之一：C := alphaop( A )op( B ) + betaC，其中 op( X ) 为以下之一：op( X ) = X 或 op( X ) = X*T，alpha 和 beta 为标量，A、B 和 C 为矩阵，其中 op( A ) 为 m x k 矩阵，op( B ) 为 k x n 矩阵，C 为 m x n 矩阵。

参数

类型	意图		名称
character(len=1),	intent(in)	::	transa
character(len=1),	intent(in)	::	transb
integer(kind=ilp),	intent(in)	::	m
integer(kind=ilp),	intent(in)	::	n
integer(kind=ilp),	intent(in)	::	k
real(kind=sp),	intent(in)	::	alpha
real(kind=sp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
real(kind=sp),	intent(in)	::	b(ldb,*)
integer(kind=ilp),	intent(in)	::	ldb
real(kind=sp),	intent(in)	::	beta
real(kind=sp),	intent(inout)	::	c(ldc,*)
integer(kind=ilp),	intent(in)	::	ldc

公共纯子程序 stdlib_zgemm(transa, transb, m, n, k, alpha, a, lda, b, ldb, beta, c, ldc)

ZGEMM 执行以下矩阵-矩阵运算之一：C := alphaop( A )op( B ) + betaC，其中 op( X ) 为以下之一：op( X ) = X 或 op( X ) = X*T 或 op( X ) = X**H，alpha 和 beta 为标量，A、B 和 C 为矩阵，其中 op( A ) 为 m x k 矩阵，op( B ) 为 k x n 矩阵，C 为 m x n 矩阵。

参数

类型	意图		名称
character(len=1),	intent(in)	::	transa
character(len=1),	intent(in)	::	transb
integer(kind=ilp),	intent(in)	::	m
integer(kind=ilp),	intent(in)	::	n
integer(kind=ilp),	intent(in)	::	k
complex(kind=dp),	intent(in)	::	alpha
complex(kind=dp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
complex(kind=dp),	intent(in)	::	b(ldb,*)
integer(kind=ilp),	intent(in)	::	ldb
complex(kind=dp),	intent(in)	::	beta
complex(kind=dp),	intent(inout)	::	c(ldc,*)
integer(kind=ilp),	intent(in)	::	ldc

公共接口 gemv

GEMV 执行以下矩阵-向量运算之一：y := alphaAx + betay，或 y := alphaA**Tx + betay，或 y := alpha*A**Hx + betay，其中 alpha 和 beta 为标量，x 和 y 为向量，A 为 m x n 矩阵。

公共纯子程序 cgemv(trans, m, n, alpha, a, lda, x, incx, beta, y, incy)

参数

类型	意图		名称
character(len=1),	intent(in)	::	trans
integer(kind=ilp),	intent(in)	::	m
integer(kind=ilp),	intent(in)	::	n
complex(kind=sp),	intent(in)	::	alpha
complex(kind=sp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
complex(kind=sp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=sp),	intent(in)	::	beta
complex(kind=sp),	intent(inout)	::	y(*)
integer(kind=ilp),	intent(in)	::	incy

公共纯子程序 dgemv(trans, m, n, alpha, a, lda, x, incx, beta, y, incy)

参数

类型	意图		名称
character(len=1),	intent(in)	::	trans
integer(kind=ilp),	intent(in)	::	m
integer(kind=ilp),	intent(in)	::	n
real(kind=dp),	intent(in)	::	alpha
real(kind=dp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
real(kind=dp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
real(kind=dp),	intent(in)	::	beta
real(kind=dp),	intent(inout)	::	y(*)
integer(kind=ilp),	intent(in)	::	incy

公共纯子程序 sgemv(trans, m, n, alpha, a, lda, x, incx, beta, y, incy)

参数

类型	意图		名称
character(len=1),	intent(in)	::	trans
integer(kind=ilp),	intent(in)	::	m
integer(kind=ilp),	intent(in)	::	n
real(kind=sp),	intent(in)	::	alpha
real(kind=sp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
real(kind=sp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
real(kind=sp),	intent(in)	::	beta
real(kind=sp),	intent(inout)	::	y(*)
integer(kind=ilp),	intent(in)	::	incy

公共纯子程序 zgemv(trans, m, n, alpha, a, lda, x, incx, beta, y, incy)

参数

类型	意图		名称
character(len=1),	intent(in)	::	trans
integer(kind=ilp),	intent(in)	::	m
integer(kind=ilp),	intent(in)	::	n
complex(kind=dp),	intent(in)	::	alpha
complex(kind=dp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
complex(kind=dp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=dp),	intent(in)	::	beta
complex(kind=dp),	intent(inout)	::	y(*)
integer(kind=ilp),	intent(in)	::	incy

公共纯子程序 stdlib_cgemv(trans, m, n, alpha, a, lda, x, incx, beta, y, incy)

CGEMV 执行以下矩阵-向量运算之一：y := alphaAx + betay，或 y := alphaA**Tx + betay，或 y := alpha*A**Hx + betay，其中 alpha 和 beta 为标量，x 和 y 为向量，A 为 m x n 矩阵。

参数

类型	意图		名称
character(len=1),	intent(in)	::	trans
integer(kind=ilp),	intent(in)	::	m
integer(kind=ilp),	intent(in)	::	n
complex(kind=sp),	intent(in)	::	alpha
complex(kind=sp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
complex(kind=sp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=sp),	intent(in)	::	beta
complex(kind=sp),	intent(inout)	::	y(*)
integer(kind=ilp),	intent(in)	::	incy

公共纯子程序 stdlib_dgemv(trans, m, n, alpha, a, lda, x, incx, beta, y, incy)

DGEMV 执行以下矩阵向量运算之一：y := alpha*A*x + beta*y 或 y := alpha*A^T*x + beta*y，其中 alpha 和 beta 是标量，x 和 y 是向量，A 是一个 m × n 矩阵。

参数

类型	意图		名称
字符(长度=1)，	intent(in)	::	trans
整数(类型=ilp)，	intent(in)	::	m
整数(类型=ilp)，	intent(in)	::	n
实数(类型=dp)，	intent(in)	::	alpha
实数(类型=dp)，	intent(in)	::	a(lda,* )
整数(类型=ilp)，	intent(in)	::	lda
实数(类型=dp)，	intent(in)	::	x(*)
整数(类型=ilp)，	intent(in)	::	incx
实数(类型=dp)，	intent(in)	::	beta
实数(类型=dp)，	intent(inout)	::	y(*)
整数(类型=ilp)，	intent(in)	::	incy

公共纯子程序 stdlib_sgemv(trans, m, n, alpha, a, lda, x, incx, beta, y, incy)

SGEMV 执行以下矩阵向量运算之一：y := alpha*A*x + beta*y 或 y := alpha*A^T*x + beta*y，其中 alpha 和 beta 是标量，x 和 y 是向量，A 是一个 m × n 矩阵。

参数

类型	意图		名称
字符(长度=1)，	intent(in)	::	trans
整数(类型=ilp)，	intent(in)	::	m
整数(类型=ilp)，	intent(in)	::	n
实数(类型=sp)，	intent(in)	::	alpha
实数(类型=sp)，	intent(in)	::	a(lda,* )
整数(类型=ilp)，	intent(in)	::	lda
实数(类型=sp)，	intent(in)	::	x(*)
整数(类型=ilp)，	intent(in)	::	incx
实数(类型=sp)，	intent(in)	::	beta
实数(类型=sp)，	intent(inout)	::	y(*)
整数(类型=ilp)，	intent(in)	::	incy

公共纯子程序 stdlib_zgemv(trans, m, n, alpha, a, lda, x, incx, beta, y, incy)

ZGEMV 执行以下矩阵向量运算之一：y := alpha*A*x + beta*y 或 y := alpha*A^T*x + beta*y 或 y := alpha*A^H*x + beta*y，其中 alpha 和 beta 是标量，x 和 y 是向量，A 是一个 m × n 矩阵。

参数

类型	意图		名称
字符(长度=1)，	intent(in)	::	trans
整数(类型=ilp)，	intent(in)	::	m
整数(类型=ilp)，	intent(in)	::	n
复数(类型=dp)，	intent(in)	::	alpha
复数(类型=dp)，	intent(in)	::	a(lda,* )
整数(类型=ilp)，	intent(in)	::	lda
复数(类型=dp)，	intent(in)	::	x(*)
整数(类型=ilp)，	intent(in)	::	incx
复数(类型=dp)，	intent(in)	::	beta
复数(类型=dp)，	intent(inout)	::	y(*)
整数(类型=ilp)，	intent(in)	::	incy

公共接口 ger

GER 执行秩 1 运算 A := alpha*x*y^T + A，其中 alpha 是标量，x 是一个 m 元素向量，y 是一个 n 元素向量，A 是一个 m × n 矩阵。

公共纯子程序 dger(m, n, alpha, x, incx, y, incy, a, lda)

参数

类型	意图		名称
整数(类型=ilp)，	intent(in)	::	m
整数(类型=ilp)，	intent(in)	::	n
实数(类型=dp)，	intent(in)	::	alpha
实数(类型=dp)，	intent(in)	::	x(*)
整数(类型=ilp)，	intent(in)	::	incx
实数(类型=dp)，	intent(in)	::	y(*)
整数(类型=ilp)，	intent(in)	::	incy
实数(类型=dp)，	intent(inout)	::	a(lda,* )
整数(类型=ilp)，	intent(in)	::	lda

公共纯子程序 sger(m, n, alpha, x, incx, y, incy, a, lda)

参数

类型	意图		名称
整数(类型=ilp)，	intent(in)	::	m
整数(类型=ilp)，	intent(in)	::	n
实数(类型=sp)，	intent(in)	::	alpha
实数(类型=sp)，	intent(in)	::	x(*)
整数(类型=ilp)，	intent(in)	::	incx
实数(类型=sp)，	intent(in)	::	y(*)
整数(类型=ilp)，	intent(in)	::	incy
实数(类型=sp)，	intent(inout)	::	a(lda,* )
整数(类型=ilp)，	intent(in)	::	lda

公共纯子程序 stdlib_dger(m, n, alpha, x, incx, y, incy, a, lda)

DGER 执行秩 1 运算 A := alpha*x*y^T + A，其中 alpha 是标量，x 是一个 m 元素向量，y 是一个 n 元素向量，A 是一个 m × n 矩阵。

参数

类型	意图		名称
整数(类型=ilp)，	intent(in)	::	m
整数(类型=ilp)，	intent(in)	::	n
实数(类型=dp)，	intent(in)	::	alpha
实数(类型=dp)，	intent(in)	::	x(*)
整数(类型=ilp)，	intent(in)	::	incx
实数(类型=dp)，	intent(in)	::	y(*)
整数(类型=ilp)，	intent(in)	::	incy
实数(类型=dp)，	intent(inout)	::	a(lda,* )
整数(类型=ilp)，	intent(in)	::	lda

公共纯子程序 stdlib_sger(m, n, alpha, x, incx, y, incy, a, lda)

SGER 执行秩 1 运算 A := alpha*x*y^T + A，其中 alpha 是标量，x 是一个 m 元素向量，y 是一个 n 元素向量，A 是一个 m × n 矩阵。

参数

类型	意图		名称
整数(类型=ilp)，	intent(in)	::	m
整数(类型=ilp)，	intent(in)	::	n
实数(类型=sp)，	intent(in)	::	alpha
实数(类型=sp)，	intent(in)	::	x(*)
整数(类型=ilp)，	intent(in)	::	incx
实数(类型=sp)，	intent(in)	::	y(*)
整数(类型=ilp)，	intent(in)	::	incy
实数(类型=sp)，	intent(inout)	::	a(lda,* )
整数(类型=ilp)，	intent(in)	::	lda

公共接口 gerc

GERC 执行秩 1 运算 A := alpha*x*y^H + A，其中 alpha 是标量，x 是一个 m 元素向量，y 是一个 n 元素向量，A 是一个 m × n 矩阵。

公共纯子程序 cgerc(m, n, alpha, x, incx, y, incy, a, lda)

参数

类型	意图		名称
整数(类型=ilp)，	intent(in)	::	m
整数(类型=ilp)，	intent(in)	::	n
复数(类型=sp)，	intent(in)	::	alpha
复数(类型=sp)，	intent(in)	::	x(*)
整数(类型=ilp)，	intent(in)	::	incx
复数(类型=sp)，	intent(in)	::	y(*)
整数(类型=ilp)，	intent(in)	::	incy
复数(类型=sp)，	intent(inout)	::	a(lda,* )
整数(类型=ilp)，	intent(in)	::	lda

公共纯子程序 zgerc(m, n, alpha, x, incx, y, incy, a, lda)

参数

类型	意图		名称
整数(类型=ilp)，	intent(in)	::	m
整数(类型=ilp)，	intent(in)	::	n
复数(类型=dp)，	intent(in)	::	alpha
复数(类型=dp)，	intent(in)	::	x(*)
整数(类型=ilp)，	intent(in)	::	incx
复数(类型=dp)，	intent(in)	::	y(*)
整数(类型=ilp)，	intent(in)	::	incy
复数(类型=dp)，	intent(inout)	::	a(lda,* )
整数(类型=ilp)，	intent(in)	::	lda

公共纯子程序 stdlib_cgerc(m, n, alpha, x, incx, y, incy, a, lda)

CGERC 执行秩 1 运算 A := alpha*x*y^H + A，其中 alpha 是标量，x 是一个 m 元素向量，y 是一个 n 元素向量，A 是一个 m × n 矩阵。

参数

类型	意图		名称
整数(类型=ilp)，	intent(in)	::	m
整数(类型=ilp)，	intent(in)	::	n
复数(类型=sp)，	intent(in)	::	alpha
复数(类型=sp)，	intent(in)	::	x(*)
整数(类型=ilp)，	intent(in)	::	incx
复数(类型=sp)，	intent(in)	::	y(*)
整数(类型=ilp)，	intent(in)	::	incy
复数(类型=sp)，	intent(inout)	::	a(lda,* )
整数(类型=ilp)，	intent(in)	::	lda

公共纯子程序 stdlib_zgerc(m, n, alpha, x, incx, y, incy, a, lda)

ZGERC 执行秩 1 运算 A := alpha*x*y^H + A，其中 alpha 是标量，x 是一个 m 元素向量，y 是一个 n 元素向量，A 是一个 m × n 矩阵。

参数

类型	意图		名称
整数(类型=ilp)，	intent(in)	::	m
整数(类型=ilp)，	intent(in)	::	n
复数(类型=dp)，	intent(in)	::	alpha
复数(类型=dp)，	intent(in)	::	x(*)
整数(类型=ilp)，	intent(in)	::	incx
复数(类型=dp)，	intent(in)	::	y(*)
整数(类型=ilp)，	intent(in)	::	incy
复数(类型=dp)，	intent(inout)	::	a(lda,* )
整数(类型=ilp)，	intent(in)	::	lda

公共接口 geru

GERU 执行秩 1 运算 A := alpha*x*y^T + A，其中 alpha 是标量，x 是一个 m 元素向量，y 是一个 n 元素向量，A 是一个 m × n 矩阵。

公共纯子程序 cgeru(m, n, alpha, x, incx, y, incy, a, lda)

参数

类型	意图		名称
整数(类型=ilp)，	intent(in)	::	m
整数(类型=ilp)，	intent(in)	::	n
复数(类型=sp)，	intent(in)	::	alpha
复数(类型=sp)，	intent(in)	::	x(*)
整数(类型=ilp)，	intent(in)	::	incx
复数(类型=sp)，	intent(in)	::	y(*)
整数(类型=ilp)，	intent(in)	::	incy
复数(类型=sp)，	intent(inout)	::	a(lda,* )
整数(类型=ilp)，	intent(in)	::	lda

公共纯子程序 zgeru(m, n, alpha, x, incx, y, incy, a, lda)

参数

类型	意图		名称
整数(类型=ilp)，	intent(in)	::	m
整数(类型=ilp)，	intent(in)	::	n
复数(类型=dp)，	intent(in)	::	alpha
复数(类型=dp)，	intent(in)	::	x(*)
整数(类型=ilp)，	intent(in)	::	incx
复数(类型=dp)，	intent(in)	::	y(*)
整数(类型=ilp)，	intent(in)	::	incy
复数(类型=dp)，	intent(inout)	::	a(lda,* )
整数(类型=ilp)，	intent(in)	::	lda

公共纯子程序 stdlib_cgeru(m, n, alpha, x, incx, y, incy, a, lda)

CGERU 执行秩 1 运算 A := alpha*x*y^T + A，其中 alpha 是标量，x 是一个 m 元素向量，y 是一个 n 元素向量，A 是一个 m × n 矩阵。

参数

类型	意图		名称
整数(类型=ilp)，	intent(in)	::	m
整数(类型=ilp)，	intent(in)	::	n
复数(类型=sp)，	intent(in)	::	alpha
复数(类型=sp)，	intent(in)	::	x(*)
整数(类型=ilp)，	intent(in)	::	incx
复数(类型=sp)，	intent(in)	::	y(*)
整数(类型=ilp)，	intent(in)	::	incy
复数(类型=sp)，	intent(inout)	::	a(lda,* )
整数(类型=ilp)，	intent(in)	::	lda

公共纯子程序 stdlib_zgeru(m, n, alpha, x, incx, y, incy, a, lda)

ZGERU 执行秩 1 运算 A := alpha*x*y^T + A，其中 alpha 是标量，x 是一个 m 元素向量，y 是一个 n 元素向量，A 是一个 m × n 矩阵。

参数

类型	意图		名称
整数(类型=ilp)，	intent(in)	::	m
整数(类型=ilp)，	intent(in)	::	n
复数(类型=dp)，	intent(in)	::	alpha
复数(类型=dp)，	intent(in)	::	x(*)
整数(类型=ilp)，	intent(in)	::	incx
复数(类型=dp)，	intent(in)	::	y(*)
整数(类型=ilp)，	intent(in)	::	incy
复数(类型=dp)，	intent(inout)	::	a(lda,* )
整数(类型=ilp)，	intent(in)	::	lda

公共接口 hbmv

HBMV 执行矩阵向量运算 y := alphaAx + beta*y，其中 alpha 和 beta 是标量，x 和 y 是 n 元素向量，A 是一个 n×n 的厄米特带状矩阵，具有 k 个超对角线。

public pure subroutine chbmv(uplo, n, k, alpha, a, lda, x, incx, beta, y, incy)

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	n
integer(kind=ilp),	intent(in)	::	k
complex(kind=sp),	intent(in)	::	alpha
complex(kind=sp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
complex(kind=sp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=sp),	intent(in)	::	beta
complex(kind=sp),	intent(inout)	::	y(*)
integer(kind=ilp),	intent(in)	::	incy

public pure subroutine zhbmv(uplo, n, k, alpha, a, lda, x, incx, beta, y, incy)

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	n
integer(kind=ilp),	intent(in)	::	k
complex(kind=dp),	intent(in)	::	alpha
complex(kind=dp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
complex(kind=dp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=dp),	intent(in)	::	beta
complex(kind=dp),	intent(inout)	::	y(*)
integer(kind=ilp),	intent(in)	::	incy

public pure subroutine stdlib_chbmv(uplo, n, k, alpha, a, lda, x, incx, beta, y, incy)

CHBMV 执行矩阵向量运算 y := alphaAx + beta*y，其中 alpha 和 beta 是标量，x 和 y 是 n 元素向量，A 是一个 n×n 的厄米特带状矩阵，具有 k 个超对角线。

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	n
integer(kind=ilp),	intent(in)	::	k
complex(kind=sp),	intent(in)	::	alpha
complex(kind=sp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
complex(kind=sp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=sp),	intent(in)	::	beta
complex(kind=sp),	intent(inout)	::	y(*)
integer(kind=ilp),	intent(in)	::	incy

public pure subroutine stdlib_zhbmv(uplo, n, k, alpha, a, lda, x, incx, beta, y, incy)

ZHBMV 执行矩阵向量运算 y := alphaAx + beta*y，其中 alpha 和 beta 是标量，x 和 y 是 n 元素向量，A 是一个 n×n 的厄米特带状矩阵，具有 k 个超对角线。

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	n
integer(kind=ilp),	intent(in)	::	k
complex(kind=dp),	intent(in)	::	alpha
complex(kind=dp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
complex(kind=dp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=dp),	intent(in)	::	beta
complex(kind=dp),	intent(inout)	::	y(*)
integer(kind=ilp),	intent(in)	::	incy

public interface hemm

HEMM 执行以下矩阵-矩阵运算之一：C := alphaAB + betaC 或 C := alphaBA + betaC，其中 alpha 和 beta 是标量，A 是一个厄米特矩阵，B 和 C 是 m×n 矩阵。

public pure subroutine chemm(side, uplo, m, n, alpha, a, lda, b, ldb, beta, c, ldc)

参数

类型	意图		名称
character(len=1),	intent(in)	::	side
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	m
integer(kind=ilp),	intent(in)	::	n
complex(kind=sp),	intent(in)	::	alpha
complex(kind=sp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
complex(kind=sp),	intent(in)	::	b(ldb,*)
integer(kind=ilp),	intent(in)	::	ldb
complex(kind=sp),	intent(in)	::	beta
complex(kind=sp),	intent(inout)	::	c(ldc,*)
integer(kind=ilp),	intent(in)	::	ldc

public pure subroutine zhemm(side, uplo, m, n, alpha, a, lda, b, ldb, beta, c, ldc)

参数

类型	意图		名称
character(len=1),	intent(in)	::	side
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	m
integer(kind=ilp),	intent(in)	::	n
complex(kind=dp),	intent(in)	::	alpha
complex(kind=dp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
complex(kind=dp),	intent(in)	::	b(ldb,*)
integer(kind=ilp),	intent(in)	::	ldb
complex(kind=dp),	intent(in)	::	beta
complex(kind=dp),	intent(inout)	::	c(ldc,*)
integer(kind=ilp),	intent(in)	::	ldc

public pure subroutine stdlib_chemm(side, uplo, m, n, alpha, a, lda, b, ldb, beta, c, ldc)

CHEMM 执行以下矩阵-矩阵运算之一：C := alphaAB + betaC 或 C := alphaBA + betaC，其中 alpha 和 beta 是标量，A 是一个厄米特矩阵，B 和 C 是 m×n 矩阵。

参数

类型	意图		名称
character(len=1),	intent(in)	::	side
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	m
integer(kind=ilp),	intent(in)	::	n
complex(kind=sp),	intent(in)	::	alpha
complex(kind=sp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
complex(kind=sp),	intent(in)	::	b(ldb,*)
integer(kind=ilp),	intent(in)	::	ldb
complex(kind=sp),	intent(in)	::	beta
complex(kind=sp),	intent(inout)	::	c(ldc,*)
integer(kind=ilp),	intent(in)	::	ldc

public pure subroutine stdlib_zhemm(side, uplo, m, n, alpha, a, lda, b, ldb, beta, c, ldc)

ZHEMM 执行以下矩阵-矩阵运算之一：C := alphaAB + betaC 或 C := alphaBA + betaC，其中 alpha 和 beta 是标量，A 是一个厄米特矩阵，B 和 C 是 m×n 矩阵。

参数

类型	意图		名称
character(len=1),	intent(in)	::	side
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	m
integer(kind=ilp),	intent(in)	::	n
complex(kind=dp),	intent(in)	::	alpha
complex(kind=dp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
complex(kind=dp),	intent(in)	::	b(ldb,*)
integer(kind=ilp),	intent(in)	::	ldb
complex(kind=dp),	intent(in)	::	beta
complex(kind=dp),	intent(inout)	::	c(ldc,*)
integer(kind=ilp),	intent(in)	::	ldc

public interface hemv

HEMV 执行矩阵向量运算 y := alphaAx + beta*y，其中 alpha 和 beta 是标量，x 和 y 是 n 元素向量，A 是一个 n×n 的厄米特矩阵。

public pure subroutine chemv(uplo, n, alpha, a, lda, x, incx, beta, y, incy)

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	n
complex(kind=sp),	intent(in)	::	alpha
complex(kind=sp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
complex(kind=sp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=sp),	intent(in)	::	beta
complex(kind=sp),	intent(inout)	::	y(*)
integer(kind=ilp),	intent(in)	::	incy

public pure subroutine zhemv(uplo, n, alpha, a, lda, x, incx, beta, y, incy)

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	n
complex(kind=dp),	intent(in)	::	alpha
complex(kind=dp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
complex(kind=dp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=dp),	intent(in)	::	beta
complex(kind=dp),	intent(inout)	::	y(*)
integer(kind=ilp),	intent(in)	::	incy

public pure subroutine stdlib_chemv(uplo, n, alpha, a, lda, x, incx, beta, y, incy)

CHEMV 执行矩阵向量运算 y := alphaAx + beta*y，其中 alpha 和 beta 是标量，x 和 y 是 n 元素向量，A 是一个 n×n 的厄米特矩阵。

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	n
complex(kind=sp),	intent(in)	::	alpha
complex(kind=sp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
complex(kind=sp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=sp),	intent(in)	::	beta
complex(kind=sp),	intent(inout)	::	y(*)
integer(kind=ilp),	intent(in)	::	incy

public pure subroutine stdlib_zhemv(uplo, n, alpha, a, lda, x, incx, beta, y, incy)

ZHEMV 执行矩阵向量运算 y := alphaAx + beta*y，其中 alpha 和 beta 是标量，x 和 y 是 n 元素向量，A 是一个 n×n 的厄米特矩阵。

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	n
complex(kind=dp),	intent(in)	::	alpha
complex(kind=dp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
complex(kind=dp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=dp),	intent(in)	::	beta
complex(kind=dp),	intent(inout)	::	y(*)
integer(kind=ilp),	intent(in)	::	incy

public interface her

HER 执行厄米特秩 1 运算 A := alphaxx**H + A，其中 alpha 是一个实数标量，x 是一个 n 元素向量，A 是一个 n×n 的厄米特矩阵。

public pure subroutine cher(uplo, n, alpha, x, incx, a, lda)

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	n
real(kind=sp),	intent(in)	::	alpha
complex(kind=sp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=sp),	intent(inout)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda

public pure subroutine zher(uplo, n, alpha, x, incx, a, lda)

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	n
real(kind=dp),	intent(in)	::	alpha
complex(kind=dp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=dp),	intent(inout)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda

public pure subroutine stdlib_cher(uplo, n, alpha, x, incx, a, lda)

CHER 执行埃尔米特秩 1 运算 A := alpha*x*x**H + A，其中 alpha 是一个实数标量，x 是一个 n 元素向量，A 是一个 n×n 的埃尔米特矩阵。

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	n
real(kind=sp),	intent(in)	::	alpha
complex(kind=sp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=sp),	intent(inout)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda

public pure subroutine stdlib_zher(uplo, n, alpha, x, incx, a, lda)

ZHER 执行埃尔米特秩 1 运算 A := alpha*x*x**H + A，其中 alpha 是一个实数标量，x 是一个 n 元素向量，A 是一个 n×n 的埃尔米特矩阵。

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	n
real(kind=dp),	intent(in)	::	alpha
complex(kind=dp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=dp),	intent(inout)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda

public interface her2

HER2 执行埃尔米特秩 2 运算 A := alpha*x*y**H + conjg( alpha )*y*x**H + A，其中 alpha 是一个标量，x 和 y 是 n 元素向量，A 是一个 n×n 的埃尔米特矩阵。

public pure subroutine cher2(uplo, n, alpha, x, incx, y, incy, a, lda)

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	n
complex(kind=sp),	intent(in)	::	alpha
complex(kind=sp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=sp),	intent(in)	::	y(*)
integer(kind=ilp),	intent(in)	::	incy
complex(kind=sp),	intent(inout)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda

public pure subroutine zher2(uplo, n, alpha, x, incx, y, incy, a, lda)

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	n
complex(kind=dp),	intent(in)	::	alpha
complex(kind=dp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=dp),	intent(in)	::	y(*)
integer(kind=ilp),	intent(in)	::	incy
complex(kind=dp),	intent(inout)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda

public pure subroutine stdlib_cher2(uplo, n, alpha, x, incx, y, incy, a, lda)

CHER2 执行埃尔米特秩 2 运算 A := alpha*x*y**H + conjg( alpha )*y*x**H + A，其中 alpha 是一个标量，x 和 y 是 n 元素向量，A 是一个 n×n 的埃尔米特矩阵。

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	n
complex(kind=sp),	intent(in)	::	alpha
complex(kind=sp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=sp),	intent(in)	::	y(*)
integer(kind=ilp),	intent(in)	::	incy
complex(kind=sp),	intent(inout)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda

public pure subroutine stdlib_zher2(uplo, n, alpha, x, incx, y, incy, a, lda)

ZHER2 执行埃尔米特秩 2 运算 A := alpha*x*y**H + conjg( alpha )*y*x**H + A，其中 alpha 是一个标量，x 和 y 是 n 元素向量，A 是一个 n×n 的埃尔米特矩阵。

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	n
complex(kind=dp),	intent(in)	::	alpha
complex(kind=dp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=dp),	intent(in)	::	y(*)
integer(kind=ilp),	intent(in)	::	incy
complex(kind=dp),	intent(inout)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda

public interface her2k

HER2K 执行以下埃尔米特秩 2k 运算之一：C := alpha*A*B**H + conjg( alpha )*B*A**H + beta*C 或 C := alpha*A**H*B + conjg( alpha )*B**H*A + beta*C，其中 alpha 和 beta 是标量，beta 为实数，C 是一个 n×n 的埃尔米特矩阵，A 和 B 在第一种情况下是 n×k 矩阵，在第二种情况下是 k×n 矩阵。

public pure subroutine cher2k(uplo, trans, n, k, alpha, a, lda, b, ldb, beta, c, ldc)

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	trans
integer(kind=ilp),	intent(in)	::	n
integer(kind=ilp),	intent(in)	::	k
complex(kind=sp),	intent(in)	::	alpha
complex(kind=sp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
complex(kind=sp),	intent(in)	::	b(ldb,*)
integer(kind=ilp),	intent(in)	::	ldb
real(kind=sp),	intent(in)	::	beta
complex(kind=sp),	intent(inout)	::	c(ldc,*)
integer(kind=ilp),	intent(in)	::	ldc

public pure subroutine zher2k(uplo, trans, n, k, alpha, a, lda, b, ldb, beta, c, ldc)

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	trans
integer(kind=ilp),	intent(in)	::	n
integer(kind=ilp),	intent(in)	::	k
complex(kind=dp),	intent(in)	::	alpha
complex(kind=dp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
complex(kind=dp),	intent(in)	::	b(ldb,*)
integer(kind=ilp),	intent(in)	::	ldb
real(kind=dp),	intent(in)	::	beta
complex(kind=dp),	intent(inout)	::	c(ldc,*)
integer(kind=ilp),	intent(in)	::	ldc

public pure subroutine stdlib_cher2k(uplo, trans, n, k, alpha, a, lda, b, ldb, beta, c, ldc)

CHER2K 执行以下埃尔米特秩 2k 运算之一：C := alpha*A*B**H + conjg( alpha )*B*A**H + beta*C 或 C := alpha*A**H*B + conjg( alpha )*B**H*A + beta*C，其中 alpha 和 beta 是标量，beta 为实数，C 是一个 n×n 的埃尔米特矩阵，A 和 B 在第一种情况下是 n×k 矩阵，在第二种情况下是 k×n 矩阵。

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	trans
integer(kind=ilp),	intent(in)	::	n
integer(kind=ilp),	intent(in)	::	k
complex(kind=sp),	intent(in)	::	alpha
complex(kind=sp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
complex(kind=sp),	intent(in)	::	b(ldb,*)
integer(kind=ilp),	intent(in)	::	ldb
real(kind=sp),	intent(in)	::	beta
complex(kind=sp),	intent(inout)	::	c(ldc,*)
integer(kind=ilp),	intent(in)	::	ldc

public pure subroutine stdlib_zher2k(uplo, trans, n, k, alpha, a, lda, b, ldb, beta, c, ldc)

ZHER2K 执行以下埃尔米特秩 2k 运算之一：C := alpha*A*B**H + conjg( alpha )*B*A**H + beta*C 或 C := alpha*A**H*B + conjg( alpha )*B**H*A + beta*C，其中 alpha 和 beta 是标量，beta 为实数，C 是一个 n×n 的埃尔米特矩阵，A 和 B 在第一种情况下是 n×k 矩阵，在第二种情况下是 k×n 矩阵。

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	trans
integer(kind=ilp),	intent(in)	::	n
integer(kind=ilp),	intent(in)	::	k
complex(kind=dp),	intent(in)	::	alpha
complex(kind=dp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
complex(kind=dp),	intent(in)	::	b(ldb,*)
integer(kind=ilp),	intent(in)	::	ldb
real(kind=dp),	intent(in)	::	beta
complex(kind=dp),	intent(inout)	::	c(ldc,*)
integer(kind=ilp),	intent(in)	::	ldc

public interface herk

HERK 执行以下埃尔米特秩 k 运算之一：C := alpha*A*A**H + beta*C 或 C := alpha*A**H*A + beta*C，其中 alpha 和 beta 是实数标量，C 是一个 n×n 的埃尔米特矩阵，A 在第一种情况下是 n×k 矩阵，在第二种情况下是 k×n 矩阵。

public pure subroutine cherk(uplo, trans, n, k, alpha, a, lda, beta, c, ldc)

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	trans
integer(kind=ilp),	intent(in)	::	n
integer(kind=ilp),	intent(in)	::	k
real(kind=sp),	intent(in)	::	alpha
complex(kind=sp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
real(kind=sp),	intent(in)	::	beta
complex(kind=sp),	intent(inout)	::	c(ldc,*)
integer(kind=ilp),	intent(in)	::	ldc

public pure subroutine zherk(uplo, trans, n, k, alpha, a, lda, beta, c, ldc)

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	trans
integer(kind=ilp),	intent(in)	::	n
integer(kind=ilp),	intent(in)	::	k
real(kind=dp),	intent(in)	::	alpha
complex(kind=dp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
real(kind=dp),	intent(in)	::	beta
complex(kind=dp),	intent(inout)	::	c(ldc,*)
integer(kind=ilp),	intent(in)	::	ldc

public pure subroutine stdlib_cherk(uplo, trans, n, k, alpha, a, lda, beta, c, ldc)

CHERK 执行以下埃尔米特秩 k 运算之一：C := alpha*A*A**H + beta*C 或 C := alpha*A**H*A + beta*C，其中 alpha 和 beta 是实数标量，C 是一个 n×n 的埃尔米特矩阵，A 在第一种情况下是 n×k 矩阵，在第二种情况下是 k×n 矩阵。

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	trans
integer(kind=ilp),	intent(in)	::	n
integer(kind=ilp),	intent(in)	::	k
real(kind=sp),	intent(in)	::	alpha
complex(kind=sp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
real(kind=sp),	intent(in)	::	beta
complex(kind=sp),	intent(inout)	::	c(ldc,*)
integer(kind=ilp),	intent(in)	::	ldc

public pure subroutine stdlib_zherk(uplo, trans, n, k, alpha, a, lda, beta, c, ldc)

ZHERK 执行以下埃尔米特秩 k 运算之一：C := alpha*A*A**H + beta*C 或 C := alpha*A**H*A + beta*C，其中 alpha 和 beta 是实数标量，C 是一个 n×n 的埃尔米特矩阵，A 在第一种情况下是 n×k 矩阵，在第二种情况下是 k×n 矩阵。

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	trans
integer(kind=ilp),	intent(in)	::	n
integer(kind=ilp),	intent(in)	::	k
real(kind=dp),	intent(in)	::	alpha
complex(kind=dp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
real(kind=dp),	intent(in)	::	beta
complex(kind=dp),	intent(inout)	::	c(ldc,*)
integer(kind=ilp),	intent(in)	::	ldc

public interface hpmv

HPMV 执行矩阵向量运算 y := alpha*A*x + beta*y，其中 alpha 和 beta 为标量，x 和 y 为 n 元素向量，A 为 n×n 厄米特矩阵，以打包形式提供。

public pure subroutine chpmv(uplo, n, alpha, ap, x, incx, beta, y, incy)

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	n
complex(kind=sp),	intent(in)	::	alpha
complex(kind=sp),	intent(in)	::	ap(*)
complex(kind=sp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=sp),	intent(in)	::	beta
complex(kind=sp),	intent(inout)	::	y(*)
integer(kind=ilp),	intent(in)	::	incy

public pure subroutine zhpmv(uplo, n, alpha, ap, x, incx, beta, y, incy)

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	n
complex(kind=dp),	intent(in)	::	alpha
complex(kind=dp),	intent(in)	::	ap(*)
complex(kind=dp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=dp),	intent(in)	::	beta
complex(kind=dp),	intent(inout)	::	y(*)
integer(kind=ilp),	intent(in)	::	incy

public pure subroutine stdlib_chpmv(uplo, n, alpha, ap, x, incx, beta, y, incy)

CHPMV 执行矩阵向量运算 y := alpha*A*x + beta*y，其中 alpha 和 beta 为标量，x 和 y 为 n 元素向量，A 为 n×n 厄米特矩阵，以打包形式提供。

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	n
complex(kind=sp),	intent(in)	::	alpha
complex(kind=sp),	intent(in)	::	ap(*)
complex(kind=sp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=sp),	intent(in)	::	beta
complex(kind=sp),	intent(inout)	::	y(*)
integer(kind=ilp),	intent(in)	::	incy

public pure subroutine stdlib_zhpmv(uplo, n, alpha, ap, x, incx, beta, y, incy)

ZHPMV 执行矩阵向量运算 y := alpha*A*x + beta*y，其中 alpha 和 beta 为标量，x 和 y 为 n 元素向量，A 为 n×n 厄米特矩阵，以打包形式提供。

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	n
complex(kind=dp),	intent(in)	::	alpha
complex(kind=dp),	intent(in)	::	ap(*)
complex(kind=dp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=dp),	intent(in)	::	beta
complex(kind=dp),	intent(inout)	::	y(*)
integer(kind=ilp),	intent(in)	::	incy

public interface hpr

HPR 执行厄米特秩 1 运算 A := alpha*x*x**H + A，其中 alpha 为实标量，x 为 n 元素向量，A 为 n×n 厄米特矩阵，以打包形式提供。

public pure subroutine chpr(uplo, n, alpha, x, incx, ap)

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	n
real(kind=sp),	intent(in)	::	alpha
complex(kind=sp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=sp),	intent(inout)	::	ap(*)

public pure subroutine zhpr(uplo, n, alpha, x, incx, ap)

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	n
real(kind=dp),	intent(in)	::	alpha
complex(kind=dp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=dp),	intent(inout)	::	ap(*)

public pure subroutine stdlib_chpr(uplo, n, alpha, x, incx, ap)

CHPR 执行厄米特秩 1 运算 A := alpha*x*x**H + A，其中 alpha 为实标量，x 为 n 元素向量，A 为 n×n 厄米特矩阵，以打包形式提供。

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	n
real(kind=sp),	intent(in)	::	alpha
complex(kind=sp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=sp),	intent(inout)	::	ap(*)

public pure subroutine stdlib_zhpr(uplo, n, alpha, x, incx, ap)

ZHPR 执行厄米特秩 1 运算 A := alpha*x*x**H + A，其中 alpha 为实标量，x 为 n 元素向量，A 为 n×n 厄米特矩阵，以打包形式提供。

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	n
real(kind=dp),	intent(in)	::	alpha
complex(kind=dp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=dp),	intent(inout)	::	ap(*)

public interface hpr2

HPR2 执行厄米特秩 2 运算 A := alpha*x*y**H + conjg( alpha )*y*x**H + A，其中 alpha 为标量，x 和 y 为 n 元素向量，A 为 n×n 厄米特矩阵，以打包形式提供。

public pure subroutine chpr2(uplo, n, alpha, x, incx, y, incy, ap)

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	n
complex(kind=sp),	intent(in)	::	alpha
complex(kind=sp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=sp),	intent(in)	::	y(*)
integer(kind=ilp),	intent(in)	::	incy
complex(kind=sp),	intent(inout)	::	ap(*)

public pure subroutine zhpr2(uplo, n, alpha, x, incx, y, incy, ap)

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	n
complex(kind=dp),	intent(in)	::	alpha
complex(kind=dp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=dp),	intent(in)	::	y(*)
integer(kind=ilp),	intent(in)	::	incy
complex(kind=dp),	intent(inout)	::	ap(*)

public pure subroutine stdlib_chpr2(uplo, n, alpha, x, incx, y, incy, ap)

CHPR2 执行厄米特秩 2 运算 A := alpha*x*y**H + conjg( alpha )*y*x**H + A，其中 alpha 为标量，x 和 y 为 n 元素向量，A 为 n×n 厄米特矩阵，以打包形式提供。

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	n
complex(kind=sp),	intent(in)	::	alpha
complex(kind=sp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=sp),	intent(in)	::	y(*)
integer(kind=ilp),	intent(in)	::	incy
complex(kind=sp),	intent(inout)	::	ap(*)

public pure subroutine stdlib_zhpr2(uplo, n, alpha, x, incx, y, incy, ap)

ZHPR2 执行厄米特秩 2 运算 A := alpha*x*y**H + conjg( alpha )*y*x**H + A，其中 alpha 为标量，x 和 y 为 n 元素向量，A 为 n×n 厄米特矩阵，以打包形式提供。

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	n
complex(kind=dp),	intent(in)	::	alpha
complex(kind=dp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
complex(kind=dp),	intent(in)	::	y(*)
integer(kind=ilp),	intent(in)	::	incy
complex(kind=dp),	intent(inout)	::	ap(*)

public interface nrm2

NRM2 通过函数名返回向量的欧几里得范数，使得 NRM2 := sqrt( x'*x )

public pure function dnrm2(n, x, incx)

参数

类型	意图		名称
integer(kind=ilp),	intent(in)	::	n
real(kind=dp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx

返回值 real(kind=dp)

public pure function snrm2(n, x, incx)

参数

类型	意图		名称
integer(kind=ilp),	intent(in)	::	n
real(kind=sp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx

返回值 real(kind=sp)

public pure function stdlib_dnrm2(n, x, incx)

DNRM2 通过函数名返回向量的欧几里得范数，使得 DNRM2 := sqrt( x'*x )

参数

类型	意图		名称
integer(kind=ilp),	intent(in)	::	n
real(kind=dp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx

返回值 real(kind=dp)

public pure function stdlib_snrm2(n, x, incx)

SNRM2 通过函数名返回向量的欧几里得范数，使得 SNRM2 := sqrt( x'*x )。

参数

类型	意图		名称
integer(kind=ilp),	intent(in)	::	n
real(kind=sp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx

返回值 real(kind=sp)

public interface rot

ROT 应用平面旋转。

public pure subroutine drot(n, dx, incx, dy, incy, c, s)

参数

类型	意图		名称
integer(kind=ilp),	intent(in)	::	n
real(kind=dp),	intent(inout)	::	dx(*)
integer(kind=ilp),	intent(in)	::	incx
real(kind=dp),	intent(inout)	::	dy(*)
integer(kind=ilp),	intent(in)	::	incy
real(kind=dp),	intent(in)	::	c
real(kind=dp),	intent(in)	::	s

public pure subroutine srot(n, sx, incx, sy, incy, c, s)

参数

类型	意图		名称
integer(kind=ilp),	intent(in)	::	n
real(kind=sp),	intent(inout)	::	sx(*)
integer(kind=ilp),	intent(in)	::	incx
real(kind=sp),	intent(inout)	::	sy(*)
integer(kind=ilp),	intent(in)	::	incy
real(kind=sp),	intent(in)	::	c
real(kind=sp),	intent(in)	::	s

public pure subroutine stdlib_drot(n, dx, incx, dy, incy, c, s)

DROT 应用平面旋转。

参数

类型	意图		名称
integer(kind=ilp),	intent(in)	::	n
real(kind=dp),	intent(inout)	::	dx(*)
integer(kind=ilp),	intent(in)	::	incx
real(kind=dp),	intent(inout)	::	dy(*)
integer(kind=ilp),	intent(in)	::	incy
real(kind=dp),	intent(in)	::	c
real(kind=dp),	intent(in)	::	s

public pure subroutine stdlib_srot(n, sx, incx, sy, incy, c, s)

应用平面旋转。

参数

类型	意图		名称
integer(kind=ilp),	intent(in)	::	n
real(kind=sp),	intent(inout)	::	sx(*)
integer(kind=ilp),	intent(in)	::	incx
real(kind=sp),	intent(inout)	::	sy(*)
integer(kind=ilp),	intent(in)	::	incy
real(kind=sp),	intent(in)	::	c
real(kind=sp),	intent(in)	::	s

public interface rotg

计算使用以下公式：|x| = sqrt( Re(x)2 + Im(x)2 ) sgn(x) = x / |x| 如果 x /= 0 = 1 如果 x = 0 c = |a| / sqrt(|a|2 + |b|2) s = sgn(a) * conjg(b) / sqrt(|a|2 + |b|2) 当 a 和 b 为实数且 r /= 0 时，公式简化为 r = sgn(a)sqrt(|a|2 + |b|*2) c = a / r s = b / r 与 SROTG 中相同，当 |a| > |b| 时。当 |b| >= |a| 时，如果 a 和 b 的符号不同，则 c 和 s 的符号将与 SROTG 计算出的符号不同。

public pure subroutine crotg(a, b, c, s)

参数

类型	意图		名称
complex(kind=sp),	intent(inout)	::	a
complex(kind=sp),	intent(in)	::	b
real(kind=sp),	intent(out)	::	c
complex(kind=sp),	intent(out)	::	s

public pure subroutine drotg(a, b, c, s)

参数

类型	意图		名称
real(kind=dp),	intent(inout)	::	a
real(kind=dp),	intent(inout)	::	b
real(kind=dp),	intent(out)	::	c
real(kind=dp),	intent(out)	::	s

public pure subroutine srotg(a, b, c, s)

参数

类型	意图		名称
real(kind=sp),	intent(inout)	::	a
real(kind=sp),	intent(inout)	::	b
real(kind=sp),	intent(out)	::	c
real(kind=sp),	intent(out)	::	s

public pure subroutine zrotg(a, b, c, s)

参数

类型	意图		名称
complex(kind=dp),	intent(inout)	::	a
complex(kind=dp),	intent(in)	::	b
real(kind=dp),	intent(out)	::	c
complex(kind=dp),	intent(out)	::	s

public pure subroutine stdlib_crotg(a, b, c, s)

计算使用以下公式：|x| = sqrt( Re(x)2 + Im(x)2 ) sgn(x) = x / |x| 如果 x /= 0 = 1 如果 x = 0 c = |a| / sqrt(|a|2 + |b|2) s = sgn(a) * conjg(b) / sqrt(|a|2 + |b|2) 当 a 和 b 为实数且 r /= 0 时，公式简化为 r = sgn(a)sqrt(|a|2 + |b|*2) c = a / r s = b / r 与 SROTG 中相同，当 |a| > |b| 时。当 |b| >= |a| 时，如果 a 和 b 的符号不同，则 c 和 s 的符号将与 SROTG 计算出的符号不同。

参数

类型	意图		名称
complex(kind=sp),	intent(inout)	::	a
complex(kind=sp),	intent(in)	::	b
real(kind=sp),	intent(out)	::	c
complex(kind=sp),	intent(out)	::	s

public pure subroutine stdlib_drotg(a, b, c, s)

计算使用以下公式：sigma = sgn(a) 如果 |a| > |b| = sgn(b) 如果 |b| >= |a| r = sigmasqrt( a2 + b2 ) c = 1; s = 0 如果 r = 0 c = a/r; s = b/r 如果 r != 0 子程序还计算 z = s 如果 |a| > |b|，= 1/c 如果 |b| >= |a| 且 c != 0 = 1 如果 c = 0 这允许从 z 中重建 c 和 s，如下所示：如果 z = 1，则设置 c = 0，s = 1。如果 |z| < 1，则设置 c = sqrt(1 - z2) 和 s = z。如果 |z| > 1，则设置 c = 1/z 和 s = sqrt( 1 - c*2)。

参数

类型	意图		名称
real(kind=dp),	intent(inout)	::	a
real(kind=dp),	intent(inout)	::	b
real(kind=dp),	intent(out)	::	c
real(kind=dp),	intent(out)	::	s

public pure subroutine stdlib_srotg(a, b, c, s)

计算使用以下公式：sigma = sgn(a) 如果 |a| > |b| = sgn(b) 如果 |b| >= |a| r = sigmasqrt( a2 + b2 ) c = 1; s = 0 如果 r = 0 c = a/r; s = b/r 如果 r != 0 子程序还计算 z = s 如果 |a| > |b|，= 1/c 如果 |b| >= |a| 且 c != 0 = 1 如果 c = 0 这允许从 z 中重建 c 和 s，如下所示：如果 z = 1，则设置 c = 0，s = 1。如果 |z| < 1，则设置 c = sqrt(1 - z2) 和 s = z。如果 |z| > 1，则设置 c = 1/z 和 s = sqrt( 1 - c*2)。

参数

类型	意图		名称
real(kind=sp),	intent(inout)	::	a
real(kind=sp),	intent(inout)	::	b
real(kind=sp),	intent(out)	::	c
real(kind=sp),	intent(out)	::	s

public pure subroutine stdlib_zrotg(a, b, c, s)

计算使用以下公式：|x| = sqrt( Re(x)2 + Im(x)2 ) sgn(x) = x / |x| 如果 x /= 0 = 1 如果 x = 0 c = |a| / sqrt(|a|2 + |b|2) s = sgn(a) * conjg(b) / sqrt(|a|2 + |b|2) 当 a 和 b 为实数且 r /= 0 时，公式简化为 r = sgn(a)sqrt(|a|2 + |b|*2) c = a / r s = b / r 与 DROTG 中相同，当 |a| > |b| 时。当 |b| >= |a| 时，如果 a 和 b 的符号不同，则 c 和 s 的符号将与 DROTG 计算出的符号不同。

参数

类型	意图		名称
complex(kind=dp),	intent(inout)	::	a
complex(kind=dp),	intent(in)	::	b
real(kind=dp),	intent(out)	::	c
complex(kind=dp),	intent(out)	::	s

public interface rotm

ROTM 应用修改后的 Givens 变换， $H$ 到 2×N 矩阵 $\left[ \begin{array}{c}DX^T\\DY^T\\ \end{array} \right],$ 其中 $^T$ 表示转置。的元素 $DX$ 位于 DX(LX+IINCX), I = 0:N-1，其中 LX = 1 如果 INCX >= 0，否则 LX = (-INCX)N，DY 也类似，使用 LY 和 INCY。当 DPARAM(1)=DFLAG 时， $H$ 具有以下其中一种形式 $H=\underbrace{\begin{bmatrix}DH_{11} & DH_{12}\\DH_{21} & DH_{22}\end{bmatrix}}_{DFLAG=-1}, \underbrace{\begin{bmatrix}1 & DH_{12}\\DH_{21} & 1\end{bmatrix}}_{DFLAG=0}, \underbrace{\begin{bmatrix}DH_{11} & 1\\-1 & DH_{22}\end{bmatrix}}_{DFLAG=1}, \underbrace{\begin{bmatrix}1 & 0\\0 & 1\end{bmatrix}}_{DFLAG=-2}.$
请参阅 ROTMG 以了解 DPARAM 中的数据存储描述。

public pure subroutine drotm(n, dx, incx, dy, incy, dparam)

参数

类型	意图		名称
integer(kind=ilp),	intent(in)	::	n
real(kind=dp),	intent(inout)	::	dx(*)
integer(kind=ilp),	intent(in)	::	incx
real(kind=dp),	intent(inout)	::	dy(*)
integer(kind=ilp),	intent(in)	::	incy
real(kind=dp),	intent(in)	::	dparam(5)

public pure subroutine srotm(n, sx, incx, sy, incy, sparam)

参数

类型	意图		名称
integer(kind=ilp),	intent(in)	::	n
real(kind=sp),	intent(inout)	::	sx(*)
integer(kind=ilp),	intent(in)	::	incx
real(kind=sp),	intent(inout)	::	sy(*)
integer(kind=ilp),	intent(in)	::	incy
real(kind=sp),	intent(in)	::	sparam(5)

public pure subroutine stdlib_drotm(n, dx, incx, dy, incy, dparam)

DROTM 应用修改后的 Givens 变换， $H$ 到 2×N 矩阵 $\left[ \begin{array}{c}DX^T\\DY^T\\ \end{array} \right],$ 其中 $^T$ 表示转置。的元素 $DX$ 位于 DX(LX+IINCX), I = 0:N-1，其中 LX = 1 如果 INCX >= 0，否则 LX = (-INCX)N，DY 也类似，使用 LY 和 INCY。当 DPARAM(1)=DFLAG 时， $H$ 具有以下其中一种形式 $H=\underbrace{\begin{bmatrix}DH_{11} & DH_{12}\\DH_{21} & DH_{22}\end{bmatrix}}_{DFLAG=-1}, \underbrace{\begin{bmatrix}1 & DH_{12}\\DH_{21} & 1\end{bmatrix}}_{DFLAG=0}, \underbrace{\begin{bmatrix}DH_{11} & 1\\-1 & DH_{22}\end{bmatrix}}_{DFLAG=1}, \underbrace{\begin{bmatrix}1 & 0\\0 & 1\end{bmatrix}}_{DFLAG=-2}.$
请参阅 DROTMG 以了解 DPARAM 中的数据存储描述。

参数

类型	意图		名称
integer(kind=ilp),	intent(in)	::	n
real(kind=dp),	intent(inout)	::	dx(*)
integer(kind=ilp),	intent(in)	::	incx
real(kind=dp),	intent(inout)	::	dy(*)
integer(kind=ilp),	intent(in)	::	incy
real(kind=dp),	intent(in)	::	dparam(5)

public pure subroutine stdlib_srotm(n, sx, incx, sy, incy, sparam)

SROTM 应用修改后的 Givens 变换， $H$ 到 2×N 矩阵 $\left[ \begin{array}{c}SX^T\\SY^T\\ \end{array} \right],$ 其中 $^T$ 表示转置。的元素 $SX$ 位于 SX(LX+IINCX), I = 0:N-1，其中 LX = 1 如果 INCX >= 0，否则 LX = (-INCX)N，SY 也类似，使用 LY 和 INCY。当 SPARAM(1)=SFLAG 时， $H$ 具有以下其中一种形式 $H=\underbrace{\begin{bmatrix}SH_{11} & SH_{12}\\SH_{21} & SH_{22}\end{bmatrix}}_{SFLAG=-1}, \underbrace{\begin{bmatrix}1 & SH_{12}\\SH_{21} & 1\end{bmatrix}}_{SFLAG=0}, \underbrace{\begin{bmatrix}SH_{11} & 1\\-1 & SH_{22}\end{bmatrix}}_{SFLAG=1}, \underbrace{\begin{bmatrix}1 & 0\\0 & 1\end{bmatrix}}_{SFLAG=-2}.$
请参阅 SROTMG 以了解 SPARAM 中的数据存储描述。

参数

类型	意图		名称
integer(kind=ilp),	intent(in)	::	n
real(kind=sp),	intent(inout)	::	sx(*)
integer(kind=ilp),	intent(in)	::	incx
real(kind=sp),	intent(inout)	::	sy(*)
integer(kind=ilp),	intent(in)	::	incy
real(kind=sp),	intent(in)	::	sparam(5)

public interface rotmg

ROTMG 构造修改后的 Givens 变换矩阵 $H$ 它将 2 向量 $\left[ {\sqrt{DD_1}\cdot DX_1,\sqrt{DD_2}\cdot DY_2} \right]^T.$ 的第二个分量置零 $H$ 具有以下其中一种形式
$H=\underbrace{\begin{bmatrix}DH_{11} & DH_{12}\\DH_{21} & DH_{22}\end{bmatrix}}_{DFLAG=-1}, \underbrace{\begin{bmatrix}1 & DH_{12}\\DH_{21} & 1\end{bmatrix}}_{DFLAG=0}, \underbrace{\begin{bmatrix}DH_{11} & 1\\-1 & DH_{22}\end{bmatrix}}_{DFLAG=1}, \underbrace{\begin{bmatrix}1 & 0\\0 & 1\end{bmatrix}}_{DFLAG=-2}.$ 当 DPARAM(1)=DFLAG 时，

public pure subroutine drotmg(dd1, dd2, dx1, dy1, dparam)

参数

类型	意图		名称
real(kind=dp),	intent(inout)	::	dd1
real(kind=dp),	intent(inout)	::	dd2
real(kind=dp),	intent(inout)	::	dx1
real(kind=dp),	intent(in)	::	dy1
real(kind=dp),	intent(out)	::	dparam(5)

public pure subroutine srotmg(sd1, sd2, sx1, sy1, sparam)

参数

类型	意图		名称
real(kind=sp),	intent(inout)	::	sd1
real(kind=sp),	intent(inout)	::	sd2
real(kind=sp),	intent(inout)	::	sx1
real(kind=sp),	intent(in)	::	sy1
real(kind=sp),	intent(out)	::	sparam(5)

public pure subroutine stdlib_drotmg(dd1, dd2, dx1, dy1, dparam)

DROTMG 构造修改后的 Givens 变换矩阵 $H$ 它将 2 向量 $\left[ {\sqrt{DD_1}\cdot DX_1,\sqrt{DD_2}\cdot DY_2} \right]^T.$ 的第二个分量置零 $H$ 具有以下其中一种形式
$H=\underbrace{\begin{bmatrix}DH_{11} & DH_{12}\\DH_{21} & DH_{22}\end{bmatrix}}_{DFLAG=-1}, \underbrace{\begin{bmatrix}1 & DH_{12}\\DH_{21} & 1\end{bmatrix}}_{DFLAG=0}, \underbrace{\begin{bmatrix}DH_{11} & 1\\-1 & DH_{22}\end{bmatrix}}_{DFLAG=1}, \underbrace{\begin{bmatrix}1 & 0\\0 & 1\end{bmatrix}}_{DFLAG=-2}.$ 当 DPARAM(1)=DFLAG 时，

参数

类型	意图		名称
real(kind=dp),	intent(inout)	::	dd1
real(kind=dp),	intent(inout)	::	dd2
real(kind=dp),	intent(inout)	::	dx1
real(kind=dp),	intent(in)	::	dy1
real(kind=dp),	intent(out)	::	dparam(5)

public pure subroutine stdlib_srotmg(sd1, sd2, sx1, sy1, sparam)

SROTMG 构造修改后的 Givens 变换矩阵 $H$ 它将 2 向量 $\left[ {\sqrt{SD_1}\cdot SX_1,\sqrt{SD_2}\cdot SY_2} \right]^T.$ 当 SPARAM(1)=SFLAG 时， $H$ 具有以下其中一种形式
$H=\underbrace{\begin{bmatrix}SH_{11} & SD_{12}\\SH_{21} & SH_{22}\end{bmatrix}}_{SFLAG=-1}, \underbrace{\begin{bmatrix}1 & SH_{12}\\SH_{21} & 1\end{bmatrix}}_{SFLAG=0}, \underbrace{\begin{bmatrix}SH_{11} & 1\\-1 & SH_{22}\end{bmatrix}}_{SFLAG=1}, \underbrace{\begin{bmatrix}1 & 0\\0 & 1\end{bmatrix}}_{SFLAG=2}.$ SPARAM 的位置 2-4 分别包含 SH11、SH21、SH12 和 SH22。（SPARAM(1) 的值隐含的 1.0、-1.0 或 0.0 不会存储在 SPARAM 中。）参数 GAMSQ 和 RGAMSQ 的值可能不精确。这没关系，因为它们仅用于测试 DD1 和 DD2 的大小。所有数据的实际缩放都使用 GAM 完成。

参数

类型	意图		名称
real(kind=sp),	intent(inout)	::	sd1
real(kind=sp),	intent(inout)	::	sd2
real(kind=sp),	intent(inout)	::	sx1
real(kind=sp),	intent(in)	::	sy1
real(kind=sp),	intent(out)	::	sparam(5)

public interface sbmv

SBMV 执行矩阵向量运算 y := alphaAx + beta*y，其中 alpha 和 beta 是标量，x 和 y 是 n 元素向量，A 是一个 n×n 对称带状矩阵，具有 k 条超对角线。

public pure subroutine dsbmv(uplo, n, k, alpha, a, lda, x, incx, beta, y, incy)

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	n
integer(kind=ilp),	intent(in)	::	k
real(kind=dp),	intent(in)	::	alpha
real(kind=dp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
real(kind=dp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
real(kind=dp),	intent(in)	::	beta
real(kind=dp),	intent(inout)	::	y(*)
integer(kind=ilp),	intent(in)	::	incy

public pure subroutine ssbmv(uplo, n, k, alpha, a, lda, x, incx, beta, y, incy)

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	n
integer(kind=ilp),	intent(in)	::	k
real(kind=sp),	intent(in)	::	alpha
real(kind=sp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
real(kind=sp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
real(kind=sp),	intent(in)	::	beta
real(kind=sp),	intent(inout)	::	y(*)
integer(kind=ilp),	intent(in)	::	incy

public pure subroutine stdlib_dsbmv(uplo, n, k, alpha, a, lda, x, incx, beta, y, incy)

DSBMV 执行矩阵向量运算 y := alphaAx + beta*y，其中 alpha 和 beta 是标量，x 和 y 是 n 元素向量，A 是一个 n×n 对称带状矩阵，具有 k 条超对角线。

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	n
integer(kind=ilp),	intent(in)	::	k
real(kind=dp),	intent(in)	::	alpha
real(kind=dp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
real(kind=dp),	intent(in)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx
real(kind=dp),	intent(in)	::	beta
real(kind=dp),	intent(inout)	::	y(*)
integer(kind=ilp),	intent(in)	::	incy

public pure subroutine stdlib_ssbmv(uplo, n, k, alpha, a, lda, x, incx, beta, y, incy)

SSBMV 执行矩阵向量运算 y := alphaAx + beta*y，其中 alpha 和 beta 是标量，x 和 y 是 n 元素向量，A 是一个 n×n 对称带状矩阵，具有 k 条超对角线。

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
integer(kind=ilp),	intent(in)	::	n
integer(kind=ilp),	intent(in)	::	k
real(kind=sp),	intent(in)	::	alpha
real(kind=sp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
real(kind=sp),	intent(in)	::	x(*)
integer(kind=ilp)，	intent(in)	::	incx
real(kind=sp)，	intent(in)	::	beta
real(kind=sp)，	intent(inout)	::	y(*)
integer(kind=ilp)，	intent(in)	::	incy

public interface scal

SCAL 将向量按常数缩放。

public pure subroutine cscal(n, ca, cx, incx)

参数

类型	意图		名称
integer(kind=ilp)，	intent(in)	::	n
complex(kind=sp)，	intent(in)	::	ca
complex(kind=sp)，	intent(inout)	::	cx(*)
integer(kind=ilp)，	intent(in)	::	incx

public pure subroutine dscal(n, da, dx, incx)

参数

类型	意图		名称
integer(kind=ilp)，	intent(in)	::	n
real(kind=dp)，	intent(in)	::	da
real(kind=dp)，	intent(inout)	::	dx(*)
integer(kind=ilp)，	intent(in)	::	incx

public pure subroutine sscal(n, sa, sx, incx)

参数

类型	意图		名称
integer(kind=ilp)，	intent(in)	::	n
real(kind=sp)，	intent(in)	::	sa
real(kind=sp)，	intent(inout)	::	sx(*)
integer(kind=ilp)，	intent(in)	::	incx

public pure subroutine zscal(n, za, zx, incx)

参数

类型	意图		名称
integer(kind=ilp)，	intent(in)	::	n
complex(kind=dp)，	intent(in)	::	za
complex(kind=dp)，	intent(inout)	::	zx(*)
integer(kind=ilp)，	intent(in)	::	incx

public pure subroutine stdlib_cscal(n, ca, cx, incx)

CSCAL 将向量按常数缩放。

参数

类型	意图		名称
integer(kind=ilp)，	intent(in)	::	n
complex(kind=sp)，	intent(in)	::	ca
complex(kind=sp)，	intent(inout)	::	cx(*)
integer(kind=ilp)，	intent(in)	::	incx

public pure subroutine stdlib_dscal(n, da, dx, incx)

DSCAL 将向量按常数缩放。对于增量等于 1 使用展开循环。

参数

类型	意图		名称
integer(kind=ilp)，	intent(in)	::	n
real(kind=dp)，	intent(in)	::	da
real(kind=dp)，	intent(inout)	::	dx(*)
integer(kind=ilp)，	intent(in)	::	incx

public pure subroutine stdlib_sscal(n, sa, sx, incx)

SSCAL 将向量按常数缩放。对于增量等于 1 使用展开循环。

参数

类型	意图		名称
integer(kind=ilp)，	intent(in)	::	n
real(kind=sp)，	intent(in)	::	sa
real(kind=sp)，	intent(inout)	::	sx(*)
integer(kind=ilp)，	intent(in)	::	incx

public pure subroutine stdlib_zscal(n, za, zx, incx)

ZSCAL 将向量按常数缩放。

参数

类型	意图		名称
integer(kind=ilp)，	intent(in)	::	n
complex(kind=dp)，	intent(in)	::	za
complex(kind=dp)，	intent(inout)	::	zx(*)
integer(kind=ilp)，	intent(in)	::	incx

public interface sdot

计算两个向量的内积，使用扩展精度累加和结果。返回在双精度中累加的双精度点积，对于单精度 SX 和 SY SDOT = 从 I = 0 到 N-1 的 SX(LX+I*INCX) * SY(LY+I*INCY) 的总和，其中 LX = 1 如果 INCX >= 0，否则 LX = 1+(1-N)*INCX，LY 以类似的方式使用 INCY 定义。

public pure function dsdot(n, sx, incx, sy, incy)

参数

类型	意图		名称
integer(kind=ilp)，	intent(in)	::	n
real(kind=sp)，	intent(in)	::	sx(*)
integer(kind=ilp)，	intent(in)	::	incx
real(kind=sp)，	intent(in)	::	sy(*)
integer(kind=ilp)，	intent(in)	::	incy

返回值 real(kind=dp)

public pure function stdlib_dsdot(n, sx, incx, sy, incy)

计算两个向量的内积，使用扩展精度累加和结果。返回在双精度中累加的双精度点积，对于单精度 SX 和 SY DSDOT = 从 I = 0 到 N-1 的 SX(LX+I*INCX) * SY(LY+I*INCY) 的总和，其中 LX = 1 如果 INCX >= 0，否则 LX = 1+(1-N)*INCX，LY 以类似的方式使用 INCY 定义。

参数

类型	意图		名称
integer(kind=ilp)，	intent(in)	::	n
real(kind=sp)，	intent(in)	::	sx(*)
integer(kind=ilp)，	intent(in)	::	incx
real(kind=sp)，	intent(in)	::	sy(*)
integer(kind=ilp)，	intent(in)	::	incy

返回值 real(kind=dp)

public interface spmv

SPMV 执行矩阵向量运算 y := alpha*A*x + beta*y，其中 alpha 和 beta 是标量，x 和 y 是 n 元素向量，A 是一个 n×n 对称矩阵，以打包形式提供。

public pure subroutine dspmv(uplo, n, alpha, ap, x, incx, beta, y, incy)

参数

类型	意图		名称
character(len=1)，	intent(in)	::	uplo
integer(kind=ilp)，	intent(in)	::	n
real(kind=dp)，	intent(in)	::	alpha
real(kind=dp)，	intent(in)	::	ap(*)
real(kind=dp)，	intent(in)	::	x(*)
integer(kind=ilp)，	intent(in)	::	incx
real(kind=dp)，	intent(in)	::	beta
real(kind=dp)，	intent(inout)	::	y(*)
integer(kind=ilp)，	intent(in)	::	incy

public pure subroutine sspmv(uplo, n, alpha, ap, x, incx, beta, y, incy)

参数

类型	意图		名称
character(len=1)，	intent(in)	::	uplo
integer(kind=ilp)，	intent(in)	::	n
real(kind=sp)，	intent(in)	::	alpha
real(kind=sp)，	intent(in)	::	ap(*)
real(kind=sp)，	intent(in)	::	x(*)
integer(kind=ilp)，	intent(in)	::	incx
real(kind=sp)，	intent(in)	::	beta
real(kind=sp)，	intent(inout)	::	y(*)
integer(kind=ilp)，	intent(in)	::	incy

public pure subroutine stdlib_dspmv(uplo, n, alpha, ap, x, incx, beta, y, incy)

DSPMV 执行矩阵向量运算 y := alpha*A*x + beta*y，其中 alpha 和 beta 是标量，x 和 y 是 n 元素向量，A 是一个 n×n 对称矩阵，以打包形式提供。

参数

类型	意图		名称
character(len=1)，	intent(in)	::	uplo
integer(kind=ilp)，	intent(in)	::	n
real(kind=dp)，	intent(in)	::	alpha
real(kind=dp)，	intent(in)	::	ap(*)
real(kind=dp)，	intent(in)	::	x(*)
integer(kind=ilp)，	intent(in)	::	incx
real(kind=dp)，	intent(in)	::	beta
real(kind=dp)，	intent(inout)	::	y(*)
integer(kind=ilp)，	intent(in)	::	incy

public pure subroutine stdlib_sspmv(uplo, n, alpha, ap, x, incx, beta, y, incy)

SSPMV 执行矩阵向量运算 y := alpha*A*x + beta*y，其中 alpha 和 beta 是标量，x 和 y 是 n 元素向量，A 是一个 n×n 对称矩阵，以打包形式提供。

参数

类型	意图		名称
character(len=1)，	intent(in)	::	uplo
integer(kind=ilp)，	intent(in)	::	n
real(kind=sp)，	intent(in)	::	alpha
real(kind=sp)，	intent(in)	::	ap(*)
real(kind=sp)，	intent(in)	::	x(*)
integer(kind=ilp)，	intent(in)	::	incx
real(kind=sp)，	intent(in)	::	beta
real(kind=sp)，	intent(inout)	::	y(*)
integer(kind=ilp)，	intent(in)	::	incy

public interface spr

SPR 执行对称秩 1 运算 A := alpha*x*x**T + A，其中 alpha 是一个实数标量，x 是一个 n 元素向量，A 是一个 n×n 对称矩阵，以打包形式提供。

public pure subroutine dspr(uplo, n, alpha, x, incx, ap)

参数

类型	意图		名称
character(len=1)，	intent(in)	::	uplo
integer(kind=ilp)，	intent(in)	::	n
real(kind=dp)，	intent(in)	::	alpha
real(kind=dp)，	intent(in)	::	x(*)
integer(kind=ilp)，	intent(in)	::	incx
real(kind=dp)，	intent(inout)	::	ap(*)

public pure subroutine sspr(uplo, n, alpha, x, incx, ap)

参数

类型	意图		名称
character(len=1)，	intent(in)	::	uplo
integer(kind=ilp)，	intent(in)	::	n
real(kind=sp)，	intent(in)	::	alpha
real(kind=sp)，	intent(in)	::	x(*)
integer(kind=ilp)，	intent(in)	::	incx
real(kind=sp)，	intent(inout)	::	ap(*)

public pure subroutine stdlib_dspr(uplo, n, alpha, x, incx, ap)

DSPR 执行对称秩 1 运算 A := alpha*x*x**T + A，其中 alpha 是一个实数标量，x 是一个 n 元素向量，A 是一个 n×n 对称矩阵，以打包形式提供。

参数

类型	意图		名称
character(len=1)，	intent(in)	::	uplo
integer(kind=ilp)，	intent(in)	::	n
real(kind=dp)，	intent(in)	::	alpha
real(kind=dp)，	intent(in)	::	x(*)
integer(kind=ilp)，	intent(in)	::	incx
real(kind=dp)，	intent(inout)	::	ap(*)

public pure subroutine stdlib_sspr(uplo, n, alpha, x, incx, ap)

SSPR 执行对称秩 1 运算 A := alpha*x*x**T + A，其中 alpha 是一个实数标量，x 是一个 n 元素向量，A 是一个 n×n 对称矩阵，以打包形式提供。

参数

类型	意图		名称
character(len=1)，	intent(in)	::	uplo
integer(kind=ilp)，	intent(in)	::	n
real(kind=sp)，	intent(in)	::	alpha
real(kind=sp)，	intent(in)	::	x(*)
integer(kind=ilp)，	intent(in)	::	incx
real(kind=sp)，	intent(inout)	::	ap(*)

public interface spr2

SPR2 执行对称秩 2 运算 A := alpha*x*y**T + alpha*y*x**T + A，其中 alpha 是一个标量，x 和 y 是 n 元素向量，A 是一个 n×n 对称矩阵，以打包形式提供。

public pure subroutine dspr2(uplo, n, alpha, x, incx, y, incy, ap)

参数

类型	意图		名称
character(len=1)，	intent(in)	::	uplo
integer(kind=ilp)，	intent(in)	::	n
real(kind=dp)，	intent(in)	::	alpha
real(kind=dp)，	intent(in)	::	x(*)
integer(kind=ilp)，	intent(in)	::	incx
real(kind=dp)，	intent(in)	::	y(*)
integer(kind=ilp)，	intent(in)	::	incy
real(kind=dp)，	intent(inout)	::	ap(*)

public pure subroutine sspr2(uplo, n, alpha, x, incx, y, incy, ap)

参数

类型	意图		名称
character(len=1)，	intent(in)	::	uplo
integer(kind=ilp)，	intent(in)	::	n
real(kind=sp)，	intent(in)	::	alpha
real(kind=sp)，	intent(in)	::	x(*)
integer(kind=ilp)，	intent(in)	::	incx
real(kind=sp)，	intent(in)	::	y(*)
integer(kind=ilp)，	intent(in)	::	incy
real(kind=sp)，	intent(inout)	::	ap(*)

public pure subroutine stdlib_dspr2(uplo, n, alpha, x, incx, y, incy, ap)

DSPR2 执行对称秩 2 运算 A := alpha*x*y**T + alpha*y*x**T + A，其中 alpha 是一个标量，x 和 y 是 n 元素向量，A 是一个 n×n 对称矩阵，以打包形式提供。

参数

类型	意图		名称
character(len=1)，	intent(in)	::	uplo
integer(kind=ilp)，	intent(in)	::	n
real(kind=dp)，	intent(in)	::	alpha
real(kind=dp)，	intent(in)	::	x(*)
integer(kind=ilp)，	intent(in)	::	incx
real(kind=dp)，	intent(in)	::	y(*)
integer(kind=ilp)，	intent(in)	::	incy
real(kind=dp)，	intent(inout)	::	ap(*)

public pure subroutine stdlib_sspr2(uplo, n, alpha, x, incx, y, incy, ap)

SSPR2 执行对称秩 2 运算 A := alpha*x*yT + alpha*y*xT + A，其中 alpha 为标量，x 和 y 为 n 元素向量，A 为 n×n 对称矩阵，以打包形式提供。

参数

类型	意图		名称
字符型(长度=1)，	intent(in)	::	uplo
整型(kind=ilp)，	intent(in)	::	n
实型(kind=sp)，	intent(in)	::	alpha
实型(kind=sp)，	intent(in)	::	x(*)
整型(kind=ilp)，	intent(in)	::	incx
实型(kind=sp)，	intent(in)	::	y(*)
整型(kind=ilp)，	intent(in)	::	incy
实型(kind=sp)，	intent(inout)	::	ap(*)

公共接口 srot

SROT 应用平面旋转，其中 cos 和 sin（c 和 s）为实数，向量 cx 和 cy 为复数。Jack Dongarra，LINPACK，1978年3月11日。

公共纯子程序 csrot(n, cx, incx, cy, incy, c, s)

参数

类型	意图		名称
整型(kind=ilp)，	intent(in)	::	n
复型(kind=sp)，	intent(inout)	::	cx(*)
整型(kind=ilp)，	intent(in)	::	incx
复型(kind=sp)，	intent(inout)	::	cy(*)
整型(kind=ilp)，	intent(in)	::	incy
实型(kind=sp)，	intent(in)	::	c
实型(kind=sp)，	intent(in)	::	s

公共纯子程序 stdlib_csrot(n, cx, incx, cy, incy, c, s)

CSROT 应用平面旋转，其中 cos 和 sin（c 和 s）为实数，向量 cx 和 cy 为复数。Jack Dongarra，LINPACK，1978年3月11日。

参数

类型	意图		名称
整型(kind=ilp)，	intent(in)	::	n
复型(kind=sp)，	intent(inout)	::	cx(*)
整型(kind=ilp)，	intent(in)	::	incx
复型(kind=sp)，	intent(inout)	::	cy(*)
整型(kind=ilp)，	intent(in)	::	incy
实型(kind=sp)，	intent(in)	::	c
实型(kind=sp)，	intent(in)	::	s

公共接口 sscal

SSCAL 将复数向量按实数常数缩放。

公共纯子程序 csscal(n, sa, cx, incx)

参数

类型	意图		名称
整型(kind=ilp)，	intent(in)	::	n
实型(kind=sp)，	intent(in)	::	sa
复型(kind=sp)，	intent(inout)	::	cx(*)
整型(kind=ilp)，	intent(in)	::	incx

公共纯子程序 stdlib_csscal(n, sa, cx, incx)

CSSCAL 将复数向量按实数常数缩放。

参数

类型	意图		名称
整型(kind=ilp)，	intent(in)	::	n
实型(kind=sp)，	intent(in)	::	sa
复型(kind=sp)，	intent(inout)	::	cx(*)
整型(kind=ilp)，	intent(in)	::	incx

公共接口 swap

SWAP 交换两个向量。

公共纯子程序 cswap(n, cx, incx, cy, incy)

参数

类型	意图		名称
整型(kind=ilp)，	intent(in)	::	n
复型(kind=sp)，	intent(inout)	::	cx(*)
整型(kind=ilp)，	intent(in)	::	incx
复型(kind=sp)，	intent(inout)	::	cy(*)
整型(kind=ilp)，	intent(in)	::	incy

公共纯子程序 dswap(n, dx, incx, dy, incy)

参数

类型	意图		名称
整型(kind=ilp)，	intent(in)	::	n
实型(kind=dp)，	intent(inout)	::	dx(*)
整型(kind=ilp)，	intent(in)	::	incx
实型(kind=dp)，	intent(inout)	::	dy(*)
整型(kind=ilp)，	intent(in)	::	incy

公共纯子程序 sswap(n, sx, incx, sy, incy)

参数

类型	意图		名称
整型(kind=ilp)，	intent(in)	::	n
实型(kind=sp)，	intent(inout)	::	sx(*)
整型(kind=ilp)，	intent(in)	::	incx
实型(kind=sp)，	intent(inout)	::	sy(*)
整型(kind=ilp)，	intent(in)	::	incy

公共纯子程序 zswap(n, zx, incx, zy, incy)

参数

类型	意图		名称
整型(kind=ilp)，	intent(in)	::	n
复型(kind=dp)，	intent(inout)	::	zx(*)
整型(kind=ilp)，	intent(in)	::	incx
复型(kind=dp)，	intent(inout)	::	zy(*)
整型(kind=ilp)，	intent(in)	::	incy

公共纯子程序 stdlib_cswap(n, cx, incx, cy, incy)

CSWAP 交换两个向量。

参数

类型	意图		名称
整型(kind=ilp)，	intent(in)	::	n
复型(kind=sp)，	intent(inout)	::	cx(*)
整型(kind=ilp)，	intent(in)	::	incx
复型(kind=sp)，	intent(inout)	::	cy(*)
整型(kind=ilp)，	intent(in)	::	incy

公共纯子程序 stdlib_dswap(n, dx, incx, dy, incy)

DSWAP 交换两个向量。对增量等于 1 使用展开循环。

参数

类型	意图		名称
整型(kind=ilp)，	intent(in)	::	n
实型(kind=dp)，	intent(inout)	::	dx(*)
整型(kind=ilp)，	intent(in)	::	incx
实型(kind=dp)，	intent(inout)	::	dy(*)
整型(kind=ilp)，	intent(in)	::	incy

公共纯子程序 stdlib_sswap(n, sx, incx, sy, incy)

SSWAP 交换两个向量。对增量等于 1 使用展开循环。

参数

类型	意图		名称
整型(kind=ilp)，	intent(in)	::	n
实型(kind=sp)，	intent(inout)	::	sx(*)
整型(kind=ilp)，	intent(in)	::	incx
实型(kind=sp)，	intent(inout)	::	sy(*)
整型(kind=ilp)，	intent(in)	::	incy

公共纯子程序 stdlib_zswap(n, zx, incx, zy, incy)

ZSWAP 交换两个向量。

参数

类型	意图		名称
整型(kind=ilp)，	intent(in)	::	n
复型(kind=dp)，	intent(inout)	::	zx(*)
整型(kind=ilp)，	intent(in)	::	incx
复型(kind=dp)，	intent(inout)	::	zy(*)
整型(kind=ilp)，	intent(in)	::	incy

公共接口 symm

SYMM 执行以下矩阵-矩阵运算之一：C := alpha*A*B + beta*C 或 C := alpha*B*A + beta*C，其中 alpha 和 beta 为标量，A 为对称矩阵，B 和 C 为 m×n 矩阵。

公共纯子程序 csymm(side, uplo, m, n, alpha, a, lda, b, ldb, beta, c, ldc)

参数

类型	意图		名称
字符型(长度=1)，	intent(in)	::	side
字符型(长度=1)，	intent(in)	::	uplo
整型(kind=ilp)，	intent(in)	::	m
整型(kind=ilp)，	intent(in)	::	n
复型(kind=sp)，	intent(in)	::	alpha
复型(kind=sp)，	intent(in)	::	a(lda,* )
整型(kind=ilp)，	intent(in)	::	lda
复型(kind=sp)，	intent(in)	::	b(ldb,*)
整型(kind=ilp)，	intent(in)	::	ldb
复型(kind=sp)，	intent(in)	::	beta
复型(kind=sp)，	intent(inout)	::	c(ldc,*)
整型(kind=ilp)，	intent(in)	::	ldc

公共纯子程序 dsymm(side, uplo, m, n, alpha, a, lda, b, ldb, beta, c, ldc)

参数

类型	意图		名称
字符型(长度=1)，	intent(in)	::	side
字符型(长度=1)，	intent(in)	::	uplo
整型(kind=ilp)，	intent(in)	::	m
整型(kind=ilp)，	intent(in)	::	n
实型(kind=dp)，	intent(in)	::	alpha
实型(kind=dp)，	intent(in)	::	a(lda,* )
整型(kind=ilp)，	intent(in)	::	lda
实型(kind=dp)，	intent(in)	::	b(ldb,*)
整型(kind=ilp)，	intent(in)	::	ldb
实型(kind=dp)，	intent(in)	::	beta
实型(kind=dp)，	intent(inout)	::	c(ldc,*)
整型(kind=ilp)，	intent(in)	::	ldc

公共纯子程序 ssymm(side, uplo, m, n, alpha, a, lda, b, ldb, beta, c, ldc)

参数

类型	意图		名称
字符型(长度=1)，	intent(in)	::	side
字符型(长度=1)，	intent(in)	::	uplo
整型(kind=ilp)，	intent(in)	::	m
整型(kind=ilp)，	intent(in)	::	n
实型(kind=sp)，	intent(in)	::	alpha
实型(kind=sp)，	intent(in)	::	a(lda,* )
整型(kind=ilp)，	intent(in)	::	lda
实型(kind=sp)，	intent(in)	::	b(ldb,*)
整型(kind=ilp)，	intent(in)	::	ldb
实型(kind=sp)，	intent(in)	::	beta
实型(kind=sp)，	intent(inout)	::	c(ldc,*)
整型(kind=ilp)，	intent(in)	::	ldc

公共纯子程序 zsymm(side, uplo, m, n, alpha, a, lda, b, ldb, beta, c, ldc)

参数

类型	意图		名称
字符型(长度=1)，	intent(in)	::	side
字符型(长度=1)，	intent(in)	::	uplo
整型(kind=ilp)，	intent(in)	::	m
整型(kind=ilp)，	intent(in)	::	n
复型(kind=dp)，	intent(in)	::	alpha
复型(kind=dp)，	intent(in)	::	a(lda,* )
整型(kind=ilp)，	intent(in)	::	lda
复型(kind=dp)，	intent(in)	::	b(ldb,*)
整型(kind=ilp)，	intent(in)	::	ldb
复型(kind=dp)，	intent(in)	::	beta
复型(kind=dp)，	intent(inout)	::	c(ldc,*)
整型(kind=ilp)，	intent(in)	::	ldc

公共纯子程序 stdlib_csymm(side, uplo, m, n, alpha, a, lda, b, ldb, beta, c, ldc)

CSYMM 执行以下矩阵-矩阵运算之一：C := alpha*A*B + beta*C 或 C := alpha*B*A + beta*C，其中 alpha 和 beta 为标量，A 为对称矩阵，B 和 C 为 m×n 矩阵。

参数

类型	意图		名称
字符型(长度=1)，	intent(in)	::	side
字符型(长度=1)，	intent(in)	::	uplo
整型(kind=ilp)，	intent(in)	::	m
整型(kind=ilp)，	intent(in)	::	n
复型(kind=sp)，	intent(in)	::	alpha
复型(kind=sp)，	intent(in)	::	a(lda,* )
整型(kind=ilp)，	intent(in)	::	lda
复型(kind=sp)，	intent(in)	::	b(ldb,*)
整型(kind=ilp)，	intent(in)	::	ldb
复型(kind=sp)，	intent(in)	::	beta
复型(kind=sp)，	intent(inout)	::	c(ldc,*)
整型(kind=ilp)，	intent(in)	::	ldc

公共纯子程序 stdlib_dsymm(side, uplo, m, n, alpha, a, lda, b, ldb, beta, c, ldc)

DSYMM 执行以下矩阵-矩阵运算之一：C := alpha*A*B + beta*C 或 C := alpha*B*A + beta*C，其中 alpha 和 beta 为标量，A 为对称矩阵，B 和 C 为 m×n 矩阵。

参数

类型	意图		名称
字符型(长度=1)，	intent(in)	::	side
字符型(长度=1)，	intent(in)	::	uplo
整型(kind=ilp)，	intent(in)	::	m
整型(kind=ilp)，	intent(in)	::	n
实型(kind=dp)，	intent(in)	::	alpha
实型(kind=dp)，	intent(in)	::	a(lda,* )
整型(kind=ilp)，	intent(in)	::	lda
实型(kind=dp)，	intent(in)	::	b(ldb,*)
整型(kind=ilp)，	intent(in)	::	ldb
实型(kind=dp)，	intent(in)	::	beta
实型(kind=dp)，	intent(inout)	::	c(ldc,*)
整型(kind=ilp)，	intent(in)	::	ldc

公共纯子程序 stdlib_ssymm(side, uplo, m, n, alpha, a, lda, b, ldb, beta, c, ldc)

SSYMM 执行以下矩阵-矩阵运算之一：C := alpha*A*B + beta*C 或 C := alpha*B*A + beta*C，其中 alpha 和 beta 为标量，A 为对称矩阵，B 和 C 为 m×n 矩阵。

参数

类型	意图		名称
字符型(长度=1)，	intent(in)	::	side
字符型(长度=1)，	intent(in)	::	uplo
整型(kind=ilp)，	intent(in)	::	m
整型(kind=ilp)，	intent(in)	::	n
实型(kind=sp)，	intent(in)	::	alpha
实型(kind=sp)，	intent(in)	::	a(lda,* )
整型(kind=ilp)，	intent(in)	::	lda
实型(kind=sp)，	intent(in)	::	b(ldb,*)
整型(kind=ilp)，	intent(in)	::	ldb
实型(kind=sp)，	intent(in)	::	beta
实型(kind=sp)，	intent(inout)	::	c(ldc,*)
整型(kind=ilp)，	intent(in)	::	ldc

公共纯子程序 stdlib_zsymm(side, uplo, m, n, alpha, a, lda, b, ldb, beta, c, ldc)

ZSYMM 执行以下矩阵-矩阵运算之一：C := alpha*A*B + beta*C 或 C := alpha*B*A + beta*C，其中 alpha 和 beta 是标量，A 是对称矩阵，B 和 C 是 m x n 矩阵。

参数

类型	意图		名称
字符型(长度=1)，	intent(in)	::	side
字符型(长度=1)，	intent(in)	::	uplo
整型(ilp类型)，	intent(in)	::	m
整型(ilp类型)，	intent(in)	::	n
复数型(dp类型)，	intent(in)	::	alpha
复数型(dp类型)，	intent(in)	::	a(lda,* )
整型(ilp类型)，	intent(in)	::	lda
复数型(dp类型)，	intent(in)	::	b(ldb,*)
整型(ilp类型)，	intent(in)	::	ldb
复数型(dp类型)，	intent(in)	::	beta
复数型(dp类型)，	intent(inout)	::	c(ldc,*)
整型(ilp类型)，	intent(in)	::	ldc

公共接口 symv

SYMV 执行矩阵-向量运算 y := alpha*A*x + beta*y，其中 alpha 和 beta 是标量，x 和 y 是 n 个元素的向量，A 是 n x n 对称矩阵。

公共纯子程序 dsymv(uplo, n, alpha, a, lda, x, incx, beta, y, incy)

参数

类型	意图		名称
字符型(长度=1)，	intent(in)	::	uplo
整型(ilp类型)，	intent(in)	::	n
实数型(dp类型)，	intent(in)	::	alpha
实数型(dp类型)，	intent(in)	::	a(lda,* )
整型(ilp类型)，	intent(in)	::	lda
实数型(dp类型)，	intent(in)	::	x(*)
整型(ilp类型)，	intent(in)	::	incx
实数型(dp类型)，	intent(in)	::	beta
实数型(dp类型)，	intent(inout)	::	y(*)
整型(ilp类型)，	intent(in)	::	incy

公共纯子程序 ssymv(uplo, n, alpha, a, lda, x, incx, beta, y, incy)

参数

类型	意图		名称
字符型(长度=1)，	intent(in)	::	uplo
整型(ilp类型)，	intent(in)	::	n
实数型(sp类型)，	intent(in)	::	alpha
实数型(sp类型)，	intent(in)	::	a(lda,* )
整型(ilp类型)，	intent(in)	::	lda
实数型(sp类型)，	intent(in)	::	x(*)
整型(ilp类型)，	intent(in)	::	incx
实数型(sp类型)，	intent(in)	::	beta
实数型(sp类型)，	intent(inout)	::	y(*)
整型(ilp类型)，	intent(in)	::	incy

公共纯子程序 stdlib_dsymv(uplo, n, alpha, a, lda, x, incx, beta, y, incy)

DSYMV 执行矩阵-向量运算 y := alpha*A*x + beta*y，其中 alpha 和 beta 是标量，x 和 y 是 n 个元素的向量，A 是 n x n 对称矩阵。

参数

类型	意图		名称
字符型(长度=1)，	intent(in)	::	uplo
整型(ilp类型)，	intent(in)	::	n
实数型(dp类型)，	intent(in)	::	alpha
实数型(dp类型)，	intent(in)	::	a(lda,* )
整型(ilp类型)，	intent(in)	::	lda
实数型(dp类型)，	intent(in)	::	x(*)
整型(ilp类型)，	intent(in)	::	incx
实数型(dp类型)，	intent(in)	::	beta
实数型(dp类型)，	intent(inout)	::	y(*)
整型(ilp类型)，	intent(in)	::	incy

公共纯子程序 stdlib_ssymv(uplo, n, alpha, a, lda, x, incx, beta, y, incy)

SSYMV 执行矩阵-向量运算 y := alpha*A*x + beta*y，其中 alpha 和 beta 是标量，x 和 y 是 n 个元素的向量，A 是 n x n 对称矩阵。

参数

类型	意图		名称
字符型(长度=1)，	intent(in)	::	uplo
整型(ilp类型)，	intent(in)	::	n
实数型(sp类型)，	intent(in)	::	alpha
实数型(sp类型)，	intent(in)	::	a(lda,* )
整型(ilp类型)，	intent(in)	::	lda
实数型(sp类型)，	intent(in)	::	x(*)
整型(ilp类型)，	intent(in)	::	incx
实数型(sp类型)，	intent(in)	::	beta
实数型(sp类型)，	intent(inout)	::	y(*)
整型(ilp类型)，	intent(in)	::	incy

公共接口 syr

SYR 执行对称秩 1 运算 A := alpha*x*x**T + A，其中 alpha 是实数标量，x 是 n 个元素的向量，A 是 n x n 对称矩阵。

公共纯子程序 dsyr(uplo, n, alpha, x, incx, a, lda)

参数

类型	意图		名称
字符型(长度=1)，	intent(in)	::	uplo
整型(ilp类型)，	intent(in)	::	n
实数型(dp类型)，	intent(in)	::	alpha
实数型(dp类型)，	intent(in)	::	x(*)
整型(ilp类型)，	intent(in)	::	incx
实数型(dp类型)，	intent(inout)	::	a(lda,* )
整型(ilp类型)，	intent(in)	::	lda

公共纯子程序 ssyr(uplo, n, alpha, x, incx, a, lda)

参数

类型	意图		名称
字符型(长度=1)，	intent(in)	::	uplo
整型(ilp类型)，	intent(in)	::	n
实数型(sp类型)，	intent(in)	::	alpha
实数型(sp类型)，	intent(in)	::	x(*)
整型(ilp类型)，	intent(in)	::	incx
实数型(sp类型)，	intent(inout)	::	a(lda,* )
整型(ilp类型)，	intent(in)	::	lda

公共纯子程序 stdlib_dsyr(uplo, n, alpha, x, incx, a, lda)

DSYR 执行对称秩 1 运算 A := alpha*x*x**T + A，其中 alpha 是实数标量，x 是 n 个元素的向量，A 是 n x n 对称矩阵。

参数

类型	意图		名称
字符型(长度=1)，	intent(in)	::	uplo
整型(ilp类型)，	intent(in)	::	n
实数型(dp类型)，	intent(in)	::	alpha
实数型(dp类型)，	intent(in)	::	x(*)
整型(ilp类型)，	intent(in)	::	incx
实数型(dp类型)，	intent(inout)	::	a(lda,* )
整型(ilp类型)，	intent(in)	::	lda

公共纯子程序 stdlib_ssyr(uplo, n, alpha, x, incx, a, lda)

SSYR 执行对称秩 1 运算 A := alpha*x*x**T + A，其中 alpha 是实数标量，x 是 n 个元素的向量，A 是 n x n 对称矩阵。

参数

类型	意图		名称
字符型(长度=1)，	intent(in)	::	uplo
整型(ilp类型)，	intent(in)	::	n
实数型(sp类型)，	intent(in)	::	alpha
实数型(sp类型)，	intent(in)	::	x(*)
整型(ilp类型)，	intent(in)	::	incx
实数型(sp类型)，	intent(inout)	::	a(lda,* )
整型(ilp类型)，	intent(in)	::	lda

公共接口 syr2

SYR2 执行对称秩 2 运算 A := alpha*x*y**T + alpha*y*x**T + A，其中 alpha 是标量，x 和 y 是 n 个元素的向量，A 是 n x n 对称矩阵。

公共纯子程序 dsyr2(uplo, n, alpha, x, incx, y, incy, a, lda)

参数

类型	意图		名称
字符型(长度=1)，	intent(in)	::	uplo
整型(ilp类型)，	intent(in)	::	n
实数型(dp类型)，	intent(in)	::	alpha
实数型(dp类型)，	intent(in)	::	x(*)
整型(ilp类型)，	intent(in)	::	incx
实数型(dp类型)，	intent(in)	::	y(*)
整型(ilp类型)，	intent(in)	::	incy
实数型(dp类型)，	intent(inout)	::	a(lda,* )
整型(ilp类型)，	intent(in)	::	lda

公共纯子程序 ssyr2(uplo, n, alpha, x, incx, y, incy, a, lda)

参数

类型	意图		名称
字符型(长度=1)，	intent(in)	::	uplo
整型(ilp类型)，	intent(in)	::	n
实数型(sp类型)，	intent(in)	::	alpha
实数型(sp类型)，	intent(in)	::	x(*)
整型(ilp类型)，	intent(in)	::	incx
实数型(sp类型)，	intent(in)	::	y(*)
整型(ilp类型)，	intent(in)	::	incy
实数型(sp类型)，	intent(inout)	::	a(lda,* )
整型(ilp类型)，	intent(in)	::	lda

公共纯子程序 stdlib_dsyr2(uplo, n, alpha, x, incx, y, incy, a, lda)

DSYR2 执行对称秩 2 运算 A := alpha*x*y**T + alpha*y*x**T + A，其中 alpha 是标量，x 和 y 是 n 个元素的向量，A 是 n x n 对称矩阵。

参数

类型	意图		名称
字符型(长度=1)，	intent(in)	::	uplo
整型(ilp类型)，	intent(in)	::	n
实数型(dp类型)，	intent(in)	::	alpha
实数型(dp类型)，	intent(in)	::	x(*)
整型(ilp类型)，	intent(in)	::	incx
实数型(dp类型)，	intent(in)	::	y(*)
整型(ilp类型)，	intent(in)	::	incy
实数型(dp类型)，	intent(inout)	::	a(lda,* )
整型(ilp类型)，	intent(in)	::	lda

公共纯子程序 stdlib_ssyr2(uplo, n, alpha, x, incx, y, incy, a, lda)

SSYR2 执行对称秩 2 运算 A := alpha*x*y**T + alpha*y*x**T + A，其中 alpha 是标量，x 和 y 是 n 个元素的向量，A 是 n x n 对称矩阵。

参数

类型	意图		名称
字符型(长度=1)，	intent(in)	::	uplo
整型(ilp类型)，	intent(in)	::	n
实数型(sp类型)，	intent(in)	::	alpha
实数型(sp类型)，	intent(in)	::	x(*)
整型(ilp类型)，	intent(in)	::	incx
实数型(sp类型)，	intent(in)	::	y(*)
整型(ilp类型)，	intent(in)	::	incy
实数型(sp类型)，	intent(inout)	::	a(lda,* )
整型(ilp类型)，	intent(in)	::	lda

公共接口 syr2k

SYR2K 执行以下对称秩 2k 运算之一：C := alpha*A*B**T + alpha*B*A**T + beta*C 或 C := alpha*A**T*B + alpha*B**T*A + beta*C，其中 alpha 和 beta 是标量，C 是 n x n 对称矩阵，A 和 B 在第一种情况下是 n x k 矩阵，在第二种情况下是 k x n 矩阵。

公共纯子程序 csyr2k(uplo, trans, n, k, alpha, a, lda, b, ldb, beta, c, ldc)

参数

类型	意图		名称
字符型(长度=1)，	intent(in)	::	uplo
字符型(长度=1)，	intent(in)	::	trans
整型(ilp类型)，	intent(in)	::	n
整型(ilp类型)，	intent(in)	::	k
复数型(sp类型)，	intent(in)	::	alpha
复数型(sp类型)，	intent(in)	::	a(lda,* )
整型(ilp类型)，	intent(in)	::	lda
复数型(sp类型)，	intent(in)	::	b(ldb,*)
整型(ilp类型)，	intent(in)	::	ldb
复数型(sp类型)，	intent(in)	::	beta
复数型(sp类型)，	intent(inout)	::	c(ldc,*)
整型(ilp类型)，	intent(in)	::	ldc

公共纯子程序 dsyr2k(uplo, trans, n, k, alpha, a, lda, b, ldb, beta, c, ldc)

参数

类型	意图		名称
字符型(长度=1)，	intent(in)	::	uplo
字符型(长度=1)，	intent(in)	::	trans
整型(ilp类型)，	intent(in)	::	n
整型(ilp类型)，	intent(in)	::	k
实数型(dp类型)，	intent(in)	::	alpha
实数型(dp类型)，	intent(in)	::	a(lda,* )
整型(ilp类型)，	intent(in)	::	lda
实数型(dp类型)，	intent(in)	::	b(ldb,*)
整型(ilp类型)，	intent(in)	::	ldb
real(kind=dp)，	intent(in)	::	beta
real(kind=dp)，	intent(inout)	::	c(ldc,*)
integer(kind=ilp)，	intent(in)	::	ldc

public pure subroutine ssyr2k(uplo, trans, n, k, alpha, a, lda, b, ldb, beta, c, ldc)

参数

类型	意图		名称
character(len=1)，	intent(in)	::	uplo
character(len=1)，	intent(in)	::	trans
integer(kind=ilp)，	intent(in)	::	n
integer(kind=ilp)，	intent(in)	::	k
real(kind=sp)，	intent(in)	::	alpha
real(kind=sp)，	intent(in)	::	a(lda,* )
integer(kind=ilp)，	intent(in)	::	lda
real(kind=sp)，	intent(in)	::	b(ldb,*)
integer(kind=ilp)，	intent(in)	::	ldb
real(kind=sp)，	intent(in)	::	beta
real(kind=sp)，	intent(inout)	::	c(ldc,*)
integer(kind=ilp)，	intent(in)	::	ldc

public pure subroutine zsyr2k(uplo, trans, n, k, alpha, a, lda, b, ldb, beta, c, ldc)

参数

类型	意图		名称
character(len=1)，	intent(in)	::	uplo
character(len=1)，	intent(in)	::	trans
integer(kind=ilp)，	intent(in)	::	n
integer(kind=ilp)，	intent(in)	::	k
complex(kind=dp)，	intent(in)	::	alpha
complex(kind=dp)，	intent(in)	::	a(lda,* )
integer(kind=ilp)，	intent(in)	::	lda
complex(kind=dp)，	intent(in)	::	b(ldb,*)
integer(kind=ilp)，	intent(in)	::	ldb
complex(kind=dp)，	intent(in)	::	beta
complex(kind=dp)，	intent(inout)	::	c(ldc,*)
integer(kind=ilp)，	intent(in)	::	ldc

public pure subroutine stdlib_csyr2k(uplo, trans, n, k, alpha, a, lda, b, ldb, beta, c, ldc)

CSYR2K 执行以下对称秩 2k 运算之一：C := alpha*A*B**T + alpha*B*A**T + beta*C，或 C := alpha*A**T*B + alpha*B**T*A + beta*C，其中 alpha 和 beta 是标量，C 是一个 n×n 对称矩阵，A 和 B 在第一种情况下是 n×k 矩阵，在第二种情况下是 k×n 矩阵。

参数

类型	意图		名称
character(len=1)，	intent(in)	::	uplo
character(len=1)，	intent(in)	::	trans
integer(kind=ilp)，	intent(in)	::	n
integer(kind=ilp)，	intent(in)	::	k
complex(kind=sp)，	intent(in)	::	alpha
complex(kind=sp)，	intent(in)	::	a(lda,* )
integer(kind=ilp)，	intent(in)	::	lda
complex(kind=sp)，	intent(in)	::	b(ldb,*)
integer(kind=ilp)，	intent(in)	::	ldb
complex(kind=sp)，	intent(in)	::	beta
complex(kind=sp)，	intent(inout)	::	c(ldc,*)
integer(kind=ilp)，	intent(in)	::	ldc

public pure subroutine stdlib_dsyr2k(uplo, trans, n, k, alpha, a, lda, b, ldb, beta, c, ldc)

DSYR2K 执行以下对称秩 2k 运算之一：C := alpha*A*B**T + alpha*B*A**T + beta*C，或 C := alpha*A**T*B + alpha*B**T*A + beta*C，其中 alpha 和 beta 是标量，C 是一个 n×n 对称矩阵，A 和 B 在第一种情况下是 n×k 矩阵，在第二种情况下是 k×n 矩阵。

参数

类型	意图		名称
character(len=1)，	intent(in)	::	uplo
character(len=1)，	intent(in)	::	trans
integer(kind=ilp)，	intent(in)	::	n
integer(kind=ilp)，	intent(in)	::	k
real(kind=dp)，	intent(in)	::	alpha
real(kind=dp)，	intent(in)	::	a(lda,* )
integer(kind=ilp)，	intent(in)	::	lda
real(kind=dp)，	intent(in)	::	b(ldb,*)
integer(kind=ilp)，	intent(in)	::	ldb
real(kind=dp)，	intent(in)	::	beta
real(kind=dp)，	intent(inout)	::	c(ldc,*)
integer(kind=ilp)，	intent(in)	::	ldc

public pure subroutine stdlib_ssyr2k(uplo, trans, n, k, alpha, a, lda, b, ldb, beta, c, ldc)

SSYR2K 执行以下对称秩 2k 运算之一：C := alpha*A*B**T + alpha*B*A**T + beta*C，或 C := alpha*A**T*B + alpha*B**T*A + beta*C，其中 alpha 和 beta 是标量，C 是一个 n×n 对称矩阵，A 和 B 在第一种情况下是 n×k 矩阵，在第二种情况下是 k×n 矩阵。

参数

类型	意图		名称
character(len=1)，	intent(in)	::	uplo
character(len=1)，	intent(in)	::	trans
integer(kind=ilp)，	intent(in)	::	n
integer(kind=ilp)，	intent(in)	::	k
real(kind=sp)，	intent(in)	::	alpha
real(kind=sp)，	intent(in)	::	a(lda,* )
integer(kind=ilp)，	intent(in)	::	lda
real(kind=sp)，	intent(in)	::	b(ldb,*)
integer(kind=ilp)，	intent(in)	::	ldb
real(kind=sp)，	intent(in)	::	beta
real(kind=sp)，	intent(inout)	::	c(ldc,*)
integer(kind=ilp)，	intent(in)	::	ldc

public pure subroutine stdlib_zsyr2k(uplo, trans, n, k, alpha, a, lda, b, ldb, beta, c, ldc)

ZSYR2K 执行以下对称秩 2k 运算之一：C := alpha*A*B**T + alpha*B*A**T + beta*C，或 C := alpha*A**T*B + alpha*B**T*A + beta*C，其中 alpha 和 beta 是标量，C 是一个 n×n 对称矩阵，A 和 B 在第一种情况下是 n×k 矩阵，在第二种情况下是 k×n 矩阵。

参数

类型	意图		名称
character(len=1)，	intent(in)	::	uplo
character(len=1)，	intent(in)	::	trans
integer(kind=ilp)，	intent(in)	::	n
integer(kind=ilp)，	intent(in)	::	k
complex(kind=dp)，	intent(in)	::	alpha
complex(kind=dp)，	intent(in)	::	a(lda,* )
integer(kind=ilp)，	intent(in)	::	lda
complex(kind=dp)，	intent(in)	::	b(ldb,*)
integer(kind=ilp)，	intent(in)	::	ldb
complex(kind=dp)，	intent(in)	::	beta
complex(kind=dp)，	intent(inout)	::	c(ldc,*)
integer(kind=ilp)，	intent(in)	::	ldc

public interface syrk

SYRK 执行以下对称秩 k 运算之一：C := alpha*A*A**T + beta*C，或 C := alpha*A**T*A + beta*C，其中 alpha 和 beta 是标量，C 是一个 n×n 对称矩阵，A 在第一种情况下是 n×k 矩阵，在第二种情况下是 k×n 矩阵。

public pure subroutine csyrk(uplo, trans, n, k, alpha, a, lda, beta, c, ldc)

参数

类型	意图		名称
character(len=1)，	intent(in)	::	uplo
character(len=1)，	intent(in)	::	trans
integer(kind=ilp)，	intent(in)	::	n
integer(kind=ilp)，	intent(in)	::	k
complex(kind=sp)，	intent(in)	::	alpha
complex(kind=sp)，	intent(in)	::	a(lda,* )
integer(kind=ilp)，	intent(in)	::	lda
complex(kind=sp)，	intent(in)	::	beta
complex(kind=sp)，	intent(inout)	::	c(ldc,*)
integer(kind=ilp)，	intent(in)	::	ldc

public pure subroutine dsyrk(uplo, trans, n, k, alpha, a, lda, beta, c, ldc)

参数

类型	意图		名称
character(len=1)，	intent(in)	::	uplo
character(len=1)，	intent(in)	::	trans
integer(kind=ilp)，	intent(in)	::	n
integer(kind=ilp)，	intent(in)	::	k
real(kind=dp)，	intent(in)	::	alpha
real(kind=dp)，	intent(in)	::	a(lda,* )
integer(kind=ilp)，	intent(in)	::	lda
real(kind=dp)，	intent(in)	::	beta
real(kind=dp)，	intent(inout)	::	c(ldc,*)
integer(kind=ilp)，	intent(in)	::	ldc

public pure subroutine ssyrk(uplo, trans, n, k, alpha, a, lda, beta, c, ldc)

参数

类型	意图		名称
character(len=1)，	intent(in)	::	uplo
character(len=1)，	intent(in)	::	trans
integer(kind=ilp)，	intent(in)	::	n
integer(kind=ilp)，	intent(in)	::	k
real(kind=sp)，	intent(in)	::	alpha
real(kind=sp)，	intent(in)	::	a(lda,* )
integer(kind=ilp)，	intent(in)	::	lda
real(kind=sp)，	intent(in)	::	beta
real(kind=sp)，	intent(inout)	::	c(ldc,*)
integer(kind=ilp)，	intent(in)	::	ldc

public pure subroutine zsyrk(uplo, trans, n, k, alpha, a, lda, beta, c, ldc)

参数

类型	意图		名称
character(len=1)，	intent(in)	::	uplo
character(len=1)，	intent(in)	::	trans
integer(kind=ilp)，	intent(in)	::	n
integer(kind=ilp)，	intent(in)	::	k
complex(kind=dp)，	intent(in)	::	alpha
complex(kind=dp)，	intent(in)	::	a(lda,* )
integer(kind=ilp)，	intent(in)	::	lda
complex(kind=dp)，	intent(in)	::	beta
complex(kind=dp)，	intent(inout)	::	c(ldc,*)
integer(kind=ilp)，	intent(in)	::	ldc

public pure subroutine stdlib_csyrk(uplo, trans, n, k, alpha, a, lda, beta, c, ldc)

CSYRK 执行以下对称秩 k 运算之一：C := alpha*A*A**T + beta*C，或 C := alpha*A**T*A + beta*C，其中 alpha 和 beta 是标量，C 是一个 n×n 对称矩阵，A 在第一种情况下是 n×k 矩阵，在第二种情况下是 k×n 矩阵。

参数

类型	意图		名称
character(len=1)，	intent(in)	::	uplo
character(len=1)，	intent(in)	::	trans
integer(kind=ilp)，	intent(in)	::	n
integer(kind=ilp)，	intent(in)	::	k
complex(kind=sp)，	intent(in)	::	alpha
complex(kind=sp)，	intent(in)	::	a(lda,* )
integer(kind=ilp)，	intent(in)	::	lda
complex(kind=sp)，	intent(in)	::	beta
complex(kind=sp)，	intent(inout)	::	c(ldc,*)
integer(kind=ilp)，	intent(in)	::	ldc

public pure subroutine stdlib_dsyrk(uplo, trans, n, k, alpha, a, lda, beta, c, ldc)

DSYRK 执行以下对称秩 k 运算之一：C := alpha*A*A**T + beta*C，或 C := alpha*A**T*A + beta*C，其中 alpha 和 beta 是标量，C 是一个 n×n 对称矩阵，A 在第一种情况下是 n×k 矩阵，在第二种情况下是 k×n 矩阵。

参数

类型	意图		名称
character(len=1)，	intent(in)	::	uplo
character(len=1)，	intent(in)	::	trans
integer(kind=ilp)，	intent(in)	::	n
integer(kind=ilp)，	intent(in)	::	k
real(kind=dp)，	intent(in)	::	alpha
real(kind=dp)，	intent(in)	::	a(lda,* )
integer(kind=ilp)，	intent(in)	::	lda
real(kind=dp)，	intent(in)	::	beta
real(kind=dp)，	intent(inout)	::	c(ldc,*)
integer(kind=ilp)，	intent(in)	::	ldc

public pure subroutine stdlib_ssyrk(uplo, trans, n, k, alpha, a, lda, beta, c, ldc)

SSYRK 执行以下对称秩 k 运算之一：C := alpha*A*A**T + beta*C，或 C := alpha*A**T*A + beta*C，其中 alpha 和 beta 是标量，C 是一个 n×n 对称矩阵，A 在第一种情况下是 n×k 矩阵，在第二种情况下是 k×n 矩阵。

参数

类型	意图		名称
character(len=1)，	intent(in)	::	uplo
character(len=1)，	intent(in)	::	trans
integer(kind=ilp)，	intent(in)	::	n
integer(kind=ilp)，	intent(in)	::	k
real(kind=sp)，	intent(in)	::	alpha
real(kind=sp)，	intent(in)	::	a(lda,* )
整数 (kind=ilp),	intent(in)	::	lda
实数 (kind=sp),	intent(in)	::	beta
实数 (kind=sp),	intent(inout)	::	c(ldc,*)
整数 (kind=ilp),	intent(in)	::	ldc

公共纯子程序 stdlib_zsyrk(uplo, trans, n, k, alpha, a, lda, beta, c, ldc)

ZSYRK 执行以下对称秩 k 操作之一：C := alphaAA^T + betaC 或 C := alphaA^TA + betaC，其中 alpha 和 beta 是标量，C 是一个 n×n 对称矩阵，A 在第一种情况下是 n×k 矩阵，在第二种情况下是 k×n 矩阵。

参数

类型	意图		名称
字符 (len=1),	intent(in)	::	uplo
字符 (len=1),	intent(in)	::	trans
整数 (kind=ilp),	intent(in)	::	n
整数 (kind=ilp),	intent(in)	::	k
复数 (kind=dp),	intent(in)	::	alpha
复数 (kind=dp),	intent(in)	::	a(lda,* )
整数 (kind=ilp),	intent(in)	::	lda
复数 (kind=dp),	intent(in)	::	beta
复数 (kind=dp),	intent(inout)	::	c(ldc,*)
整数 (kind=ilp),	intent(in)	::	ldc

公共接口 tbmv

TBMV 执行以下矩阵-向量运算之一：x := Ax 或 x := A^Tx 或 x := A^Hx，其中 x 是一个 n 元素向量，A 是一个 n×n 单位或非单位上或下三角带状矩阵，具有 (k+1) 条对角线。

公共纯子程序 ctbmv(uplo, trans, diag, n, k, a, lda, x, incx)

参数

类型	意图		名称
字符 (len=1),	intent(in)	::	uplo
字符 (len=1),	intent(in)	::	trans
字符 (len=1),	intent(in)	::	diag
整数 (kind=ilp),	intent(in)	::	n
整数 (kind=ilp),	intent(in)	::	k
复数 (kind=sp),	intent(in)	::	a(lda,* )
整数 (kind=ilp),	intent(in)	::	lda
复数 (kind=sp),	intent(inout)	::	x(*)
整数 (kind=ilp),	intent(in)	::	incx

公共纯子程序 dtbmv(uplo, trans, diag, n, k, a, lda, x, incx)

参数

类型	意图		名称
字符 (len=1),	intent(in)	::	uplo
字符 (len=1),	intent(in)	::	trans
字符 (len=1),	intent(in)	::	diag
整数 (kind=ilp),	intent(in)	::	n
整数 (kind=ilp),	intent(in)	::	k
实数 (kind=dp),	intent(in)	::	a(lda,* )
整数 (kind=ilp),	intent(in)	::	lda
实数 (kind=dp),	intent(inout)	::	x(*)
整数 (kind=ilp),	intent(in)	::	incx

公共纯子程序 stbmv(uplo, trans, diag, n, k, a, lda, x, incx)

参数

类型	意图		名称
字符 (len=1),	intent(in)	::	uplo
字符 (len=1),	intent(in)	::	trans
字符 (len=1),	intent(in)	::	diag
整数 (kind=ilp),	intent(in)	::	n
整数 (kind=ilp),	intent(in)	::	k
实数 (kind=sp),	intent(in)	::	a(lda,* )
整数 (kind=ilp),	intent(in)	::	lda
实数 (kind=sp),	intent(inout)	::	x(*)
整数 (kind=ilp),	intent(in)	::	incx

公共纯子程序 ztbmv(uplo, trans, diag, n, k, a, lda, x, incx)

参数

类型	意图		名称
字符 (len=1),	intent(in)	::	uplo
字符 (len=1),	intent(in)	::	trans
字符 (len=1),	intent(in)	::	diag
整数 (kind=ilp),	intent(in)	::	n
整数 (kind=ilp),	intent(in)	::	k
复数 (kind=dp),	intent(in)	::	a(lda,* )
整数 (kind=ilp),	intent(in)	::	lda
复数 (kind=dp),	intent(inout)	::	x(*)
整数 (kind=ilp),	intent(in)	::	incx

公共纯子程序 stdlib_ctbmv(uplo, trans, diag, n, k, a, lda, x, incx)

CTBMV 执行以下矩阵-向量运算之一：x := Ax 或 x := A^Tx 或 x := A^Hx，其中 x 是一个 n 元素向量，A 是一个 n×n 单位或非单位上或下三角带状矩阵，具有 (k+1) 条对角线。

参数

类型	意图		名称
字符 (len=1),	intent(in)	::	uplo
字符 (len=1),	intent(in)	::	trans
字符 (len=1),	intent(in)	::	diag
整数 (kind=ilp),	intent(in)	::	n
整数 (kind=ilp),	intent(in)	::	k
复数 (kind=sp),	intent(in)	::	a(lda,* )
整数 (kind=ilp),	intent(in)	::	lda
复数 (kind=sp),	intent(inout)	::	x(*)
整数 (kind=ilp),	intent(in)	::	incx

公共纯子程序 stdlib_dtbmv(uplo, trans, diag, n, k, a, lda, x, incx)

DTBMV 执行以下矩阵-向量运算之一：x := Ax 或 x := A^Tx，其中 x 是一个 n 元素向量，A 是一个 n×n 单位或非单位上或下三角带状矩阵，具有 (k+1) 条对角线。

参数

类型	意图		名称
字符 (len=1),	intent(in)	::	uplo
字符 (len=1),	intent(in)	::	trans
字符 (len=1),	intent(in)	::	diag
整数 (kind=ilp),	intent(in)	::	n
整数 (kind=ilp),	intent(in)	::	k
实数 (kind=dp),	intent(in)	::	a(lda,* )
整数 (kind=ilp),	intent(in)	::	lda
实数 (kind=dp),	intent(inout)	::	x(*)
整数 (kind=ilp),	intent(in)	::	incx

公共纯子程序 stdlib_stbmv(uplo, trans, diag, n, k, a, lda, x, incx)

STBMV 执行以下矩阵-向量运算之一：x := Ax 或 x := A^Tx，其中 x 是一个 n 元素向量，A 是一个 n×n 单位或非单位上或下三角带状矩阵，具有 (k+1) 条对角线。

参数

类型	意图		名称
字符 (len=1),	intent(in)	::	uplo
字符 (len=1),	intent(in)	::	trans
字符 (len=1),	intent(in)	::	diag
整数 (kind=ilp),	intent(in)	::	n
整数 (kind=ilp),	intent(in)	::	k
实数 (kind=sp),	intent(in)	::	a(lda,* )
整数 (kind=ilp),	intent(in)	::	lda
实数 (kind=sp),	intent(inout)	::	x(*)
整数 (kind=ilp),	intent(in)	::	incx

公共纯子程序 stdlib_ztbmv(uplo, trans, diag, n, k, a, lda, x, incx)

ZTBMV 执行以下矩阵-向量运算之一：x := Ax 或 x := A^Tx 或 x := A^Hx，其中 x 是一个 n 元素向量，A 是一个 n×n 单位或非单位上或下三角带状矩阵，具有 (k+1) 条对角线。

参数

类型	意图		名称
字符 (len=1),	intent(in)	::	uplo
字符 (len=1),	intent(in)	::	trans
字符 (len=1),	intent(in)	::	diag
整数 (kind=ilp),	intent(in)	::	n
整数 (kind=ilp),	intent(in)	::	k
复数 (kind=dp),	intent(in)	::	a(lda,* )
整数 (kind=ilp),	intent(in)	::	lda
复数 (kind=dp),	intent(inout)	::	x(*)
整数 (kind=ilp),	intent(in)	::	incx

公共接口 tbsv

TBSV 求解以下方程组之一：Ax = b 或 A^Tx = b 或 A^Hx = b，其中 b 和 x 是 n 元素向量，A 是一个 n×n 单位或非单位上或下三角带状矩阵，具有 (k+1) 条对角线。此例程不包含奇异性或接近奇异性的测试。在调用此例程之前，必须执行此类测试。

公共纯子程序 ctbsv(uplo, trans, diag, n, k, a, lda, x, incx)

参数

类型	意图		名称
字符 (len=1),	intent(in)	::	uplo
字符 (len=1),	intent(in)	::	trans
字符 (len=1),	intent(in)	::	diag
整数 (kind=ilp),	intent(in)	::	n
整数 (kind=ilp),	intent(in)	::	k
复数 (kind=sp),	intent(in)	::	a(lda,* )
整数 (kind=ilp),	intent(in)	::	lda
复数 (kind=sp),	intent(inout)	::	x(*)
整数 (kind=ilp),	intent(in)	::	incx

公共纯子程序 dtbsv(uplo, trans, diag, n, k, a, lda, x, incx)

参数

类型	意图		名称
字符 (len=1),	intent(in)	::	uplo
字符 (len=1),	intent(in)	::	trans
字符 (len=1),	intent(in)	::	diag
整数 (kind=ilp),	intent(in)	::	n
整数 (kind=ilp),	intent(in)	::	k
实数 (kind=dp),	intent(in)	::	a(lda,* )
整数 (kind=ilp),	intent(in)	::	lda
实数 (kind=dp),	intent(inout)	::	x(*)
整数 (kind=ilp),	intent(in)	::	incx

公共纯子程序 stbsv(uplo, trans, diag, n, k, a, lda, x, incx)

参数

类型	意图		名称
字符 (len=1),	intent(in)	::	uplo
字符 (len=1),	intent(in)	::	trans
字符 (len=1),	intent(in)	::	diag
整数 (kind=ilp),	intent(in)	::	n
整数 (kind=ilp),	intent(in)	::	k
实数 (kind=sp),	intent(in)	::	a(lda,* )
整数 (kind=ilp),	intent(in)	::	lda
实数 (kind=sp),	intent(inout)	::	x(*)
整数 (kind=ilp),	intent(in)	::	incx

公共纯子程序 ztbsv(uplo, trans, diag, n, k, a, lda, x, incx)

参数

类型	意图		名称
字符 (len=1),	intent(in)	::	uplo
字符 (len=1),	intent(in)	::	trans
字符 (len=1),	intent(in)	::	diag
整数 (kind=ilp),	intent(in)	::	n
整数 (kind=ilp),	intent(in)	::	k
复数 (kind=dp),	intent(in)	::	a(lda,* )
整数 (kind=ilp),	intent(in)	::	lda
复数 (kind=dp),	intent(inout)	::	x(*)
整数 (kind=ilp),	intent(in)	::	incx

公共纯子程序 stdlib_ctbsv(uplo, trans, diag, n, k, a, lda, x, incx)

CTBSV 求解以下方程组之一：Ax = b 或 A^Tx = b 或 A^Hx = b，其中 b 和 x 是 n 元素向量，A 是一个 n×n 单位或非单位上或下三角带状矩阵，具有 (k+1) 条对角线。此例程不包含奇异性或接近奇异性的测试。在调用此例程之前，必须执行此类测试。

参数

类型	意图		名称
字符 (len=1),	intent(in)	::	uplo
字符 (len=1),	intent(in)	::	trans
字符 (len=1),	intent(in)	::	diag
整数 (kind=ilp),	intent(in)	::	n
整数 (kind=ilp),	intent(in)	::	k
复数 (kind=sp),	intent(in)	::	a(lda,* )
整数 (kind=ilp),	intent(in)	::	lda
复数 (kind=sp),	intent(inout)	::	x(*)
整数 (kind=ilp),	intent(in)	::	incx

公共纯子程序 stdlib_dtbsv(uplo, trans, diag, n, k, a, lda, x, incx)

DTBSV 求解以下方程组之一：Ax = b 或 A^Tx = b，其中 b 和 x 是 n 元素向量，A 是一个 n×n 单位或非单位上或下三角带状矩阵，具有 (k+1) 条对角线。此例程不包含奇异性或接近奇异性的测试。在调用此例程之前，必须执行此类测试。

参数

类型	意图		名称
字符 (len=1),	intent(in)	::	uplo
字符 (len=1),	intent(in)	::	trans
字符 (len=1),	intent(in)	::	diag
整数 (kind=ilp),	intent(in)	::	n
整数 (kind=ilp),	intent(in)	::	k
实数 (kind=dp),	intent(in)	::	a(lda,* )
整数 (kind=ilp),	intent(in)	::	lda
实数 (kind=dp),	intent(inout)	::	x(*)
整数 (kind=ilp),	intent(in)	::	incx

public pure subroutine stdlib_stbsv(uplo, trans, diag, n, k, a, lda, x, incx)

STBSV 求解以下方程组之一：A*x = b 或 A^Tx = b，其中 b 和 x 是 n 元素向量，A 是一个 n×n 的单位或非单位上三角或下三角带状矩阵，具有 (k+1) 条对角线。此例程不包含奇异性或近似奇异性的测试。在调用此例程之前，必须执行此类测试。

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	trans
character(len=1),	intent(in)	::	diag
integer(kind=ilp),	intent(in)	::	n
integer(kind=ilp),	intent(in)	::	k
real(kind=sp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
real(kind=sp),	intent(inout)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx

public pure subroutine stdlib_ztbsv(uplo, trans, diag, n, k, a, lda, x, incx)

ZTBSV 求解以下方程组之一：A*x = b 或 A^Tx = b 或 A^Hx = b，其中 b 和 x 是 n 元素向量，A 是一个 n×n 的单位或非单位上三角或下三角带状矩阵，具有 (k+1) 条对角线。此例程不包含奇异性或近似奇异性的测试。在调用此例程之前，必须执行此类测试。

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	trans
character(len=1),	intent(in)	::	diag
integer(kind=ilp),	intent(in)	::	n
integer(kind=ilp),	intent(in)	::	k
complex(kind=dp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
complex(kind=dp),	intent(inout)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx

public interface tpmv

TPMV 执行以下矩阵-向量运算之一：x := A*x 或 x := A^Tx 或 x := A^Hx，其中 x 是一个 n 元素向量，A 是一个 n×n 的单位或非单位上三角或下三角矩阵，以打包形式提供。

public pure subroutine ctpmv(uplo, trans, diag, n, ap, x, incx)

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	trans
character(len=1),	intent(in)	::	diag
integer(kind=ilp),	intent(in)	::	n
complex(kind=sp),	intent(in)	::	ap(*)
complex(kind=sp),	intent(inout)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx

public pure subroutine dtpmv(uplo, trans, diag, n, ap, x, incx)

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	trans
character(len=1),	intent(in)	::	diag
integer(kind=ilp),	intent(in)	::	n
real(kind=dp),	intent(in)	::	ap(*)
real(kind=dp),	intent(inout)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx

public pure subroutine stpmv(uplo, trans, diag, n, ap, x, incx)

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	trans
character(len=1),	intent(in)	::	diag
integer(kind=ilp),	intent(in)	::	n
real(kind=sp),	intent(in)	::	ap(*)
real(kind=sp),	intent(inout)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx

public pure subroutine ztpmv(uplo, trans, diag, n, ap, x, incx)

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	trans
character(len=1),	intent(in)	::	diag
integer(kind=ilp),	intent(in)	::	n
complex(kind=dp),	intent(in)	::	ap(*)
complex(kind=dp),	intent(inout)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx

public pure subroutine stdlib_ctpmv(uplo, trans, diag, n, ap, x, incx)

CTPMV 执行以下矩阵-向量运算之一：x := A*x 或 x := A^Tx 或 x := A^Hx，其中 x 是一个 n 元素向量，A 是一个 n×n 的单位或非单位上三角或下三角矩阵，以打包形式提供。

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	trans
character(len=1),	intent(in)	::	diag
integer(kind=ilp),	intent(in)	::	n
complex(kind=sp),	intent(in)	::	ap(*)
complex(kind=sp),	intent(inout)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx

public pure subroutine stdlib_dtpmv(uplo, trans, diag, n, ap, x, incx)

DTPMV 执行以下矩阵-向量运算之一：x := A*x 或 x := A^Tx，其中 x 是一个 n 元素向量，A 是一个 n×n 的单位或非单位上三角或下三角矩阵，以打包形式提供。

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	trans
character(len=1),	intent(in)	::	diag
integer(kind=ilp),	intent(in)	::	n
real(kind=dp),	intent(in)	::	ap(*)
real(kind=dp),	intent(inout)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx

public pure subroutine stdlib_stpmv(uplo, trans, diag, n, ap, x, incx)

STPMV 执行以下矩阵-向量运算之一：x := A*x 或 x := A^Tx，其中 x 是一个 n 元素向量，A 是一个 n×n 的单位或非单位上三角或下三角矩阵，以打包形式提供。

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	trans
character(len=1),	intent(in)	::	diag
integer(kind=ilp),	intent(in)	::	n
real(kind=sp),	intent(in)	::	ap(*)
real(kind=sp),	intent(inout)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx

public pure subroutine stdlib_ztpmv(uplo, trans, diag, n, ap, x, incx)

ZTPMV 执行以下矩阵-向量运算之一：x := A*x 或 x := A^Tx 或 x := A^Hx，其中 x 是一个 n 元素向量，A 是一个 n×n 的单位或非单位上三角或下三角矩阵，以打包形式提供。

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	trans
character(len=1),	intent(in)	::	diag
integer(kind=ilp),	intent(in)	::	n
complex(kind=dp),	intent(in)	::	ap(*)
complex(kind=dp),	intent(inout)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx

public interface tpsv

TPSV 求解以下方程组之一：A*x = b 或 A^Tx = b 或 A^Hx = b，其中 b 和 x 是 n 元素向量，A 是一个 n×n 的单位或非单位上三角或下三角矩阵，以打包形式提供。此例程不包含奇异性或近似奇异性的测试。在调用此例程之前，必须执行此类测试。

public pure subroutine ctpsv(uplo, trans, diag, n, ap, x, incx)

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	trans
character(len=1),	intent(in)	::	diag
integer(kind=ilp),	intent(in)	::	n
complex(kind=sp),	intent(in)	::	ap(*)
complex(kind=sp),	intent(inout)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx

public pure subroutine dtpsv(uplo, trans, diag, n, ap, x, incx)

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	trans
character(len=1),	intent(in)	::	diag
integer(kind=ilp),	intent(in)	::	n
real(kind=dp),	intent(in)	::	ap(*)
real(kind=dp),	intent(inout)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx

public pure subroutine stpsv(uplo, trans, diag, n, ap, x, incx)

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	trans
character(len=1),	intent(in)	::	diag
integer(kind=ilp),	intent(in)	::	n
real(kind=sp),	intent(in)	::	ap(*)
real(kind=sp),	intent(inout)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx

public pure subroutine ztpsv(uplo, trans, diag, n, ap, x, incx)

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	trans
character(len=1),	intent(in)	::	diag
integer(kind=ilp),	intent(in)	::	n
complex(kind=dp),	intent(in)	::	ap(*)
complex(kind=dp),	intent(inout)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx

public pure subroutine stdlib_ctpsv(uplo, trans, diag, n, ap, x, incx)

CTPSV 求解以下方程组之一：A*x = b 或 A^Tx = b 或 A^Hx = b，其中 b 和 x 是 n 元素向量，A 是一个 n×n 的单位或非单位上三角或下三角矩阵，以打包形式提供。此例程不包含奇异性或近似奇异性的测试。在调用此例程之前，必须执行此类测试。

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	trans
character(len=1),	intent(in)	::	diag
integer(kind=ilp),	intent(in)	::	n
complex(kind=sp),	intent(in)	::	ap(*)
complex(kind=sp),	intent(inout)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx

public pure subroutine stdlib_dtpsv(uplo, trans, diag, n, ap, x, incx)

DTPSV 求解以下方程组之一：A*x = b 或 A^Tx = b，其中 b 和 x 是 n 元素向量，A 是一个 n×n 的单位或非单位上三角或下三角矩阵，以打包形式提供。此例程不包含奇异性或近似奇异性的测试。在调用此例程之前，必须执行此类测试。

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	trans
character(len=1),	intent(in)	::	diag
integer(kind=ilp),	intent(in)	::	n
real(kind=dp),	intent(in)	::	ap(*)
real(kind=dp),	intent(inout)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx

public pure subroutine stdlib_stpsv(uplo, trans, diag, n, ap, x, incx)

STPSV 求解以下方程组之一：A*x = b 或 A^Tx = b，其中 b 和 x 是 n 元素向量，A 是一个 n×n 的单位或非单位上三角或下三角矩阵，以打包形式提供。此例程不包含奇异性或近似奇异性的测试。在调用此例程之前，必须执行此类测试。

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	trans
character(len=1),	intent(in)	::	diag
integer(kind=ilp),	intent(in)	::	n
real(kind=sp),	intent(in)	::	ap(*)
real(kind=sp),	intent(inout)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx

public pure subroutine stdlib_ztpsv(uplo, trans, diag, n, ap, x, incx)

ZTPSV 求解以下方程组之一：A*x = b 或 A^Tx = b 或 A^Hx = b，其中 b 和 x 是 n 元素向量，A 是一个 n×n 的单位或非单位上三角或下三角矩阵，以打包形式提供。此例程不包含奇异性或近似奇异性的测试。在调用此例程之前，必须执行此类测试。

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	trans
character(len=1),	intent(in)	::	diag
integer(kind=ilp),	intent(in)	::	n
复数型（kind=dp），	intent(in)	::	ap(*)
复数型（kind=dp），	intent(inout)	::	x(*)
整型（kind=ilp），	intent(in)	::	incx

公共接口 trmm

TRMM 执行以下矩阵-矩阵运算之一：B := alphaop( A )B 或 B := alphaBop( A )，其中 alpha 是一个标量，B 是一个 m×n 矩阵，A 是一个单位或非单位的上三角或下三角矩阵，op( A ) 是以下运算之一：op( A ) = A 或 op( A ) = AT 或 op( A ) = AH。

公共纯子程序 ctrmm(side, uplo, transa, diag, m, n, alpha, a, lda, b, ldb)

参数

类型	意图		名称
字符型（len=1），	intent(in)	::	side
字符型（len=1），	intent(in)	::	uplo
字符型（len=1），	intent(in)	::	transa
字符型（len=1），	intent(in)	::	diag
整型（kind=ilp），	intent(in)	::	m
整型（kind=ilp），	intent(in)	::	n
复数型（kind=sp），	intent(in)	::	alpha
复数型（kind=sp），	intent(in)	::	a(lda,* )
整型（kind=ilp），	intent(in)	::	lda
复数型（kind=sp），	intent(inout)	::	b(ldb,*)
整型（kind=ilp），	intent(in)	::	ldb

公共纯子程序 dtrmm(side, uplo, transa, diag, m, n, alpha, a, lda, b, ldb)

参数

类型	意图		名称
字符型（len=1），	intent(in)	::	side
字符型（len=1），	intent(in)	::	uplo
字符型（len=1），	intent(in)	::	transa
字符型（len=1），	intent(in)	::	diag
整型（kind=ilp），	intent(in)	::	m
整型（kind=ilp），	intent(in)	::	n
实数型（kind=dp），	intent(in)	::	alpha
实数型（kind=dp），	intent(in)	::	a(lda,* )
整型（kind=ilp），	intent(in)	::	lda
实数型（kind=dp），	intent(inout)	::	b(ldb,*)
整型（kind=ilp），	intent(in)	::	ldb

公共纯子程序 strmm(side, uplo, transa, diag, m, n, alpha, a, lda, b, ldb)

参数

类型	意图		名称
字符型（len=1），	intent(in)	::	side
字符型（len=1），	intent(in)	::	uplo
字符型（len=1），	intent(in)	::	transa
字符型（len=1），	intent(in)	::	diag
整型（kind=ilp），	intent(in)	::	m
整型（kind=ilp），	intent(in)	::	n
实数型（kind=sp），	intent(in)	::	alpha
实数型（kind=sp），	intent(in)	::	a(lda,* )
整型（kind=ilp），	intent(in)	::	lda
实数型（kind=sp），	intent(inout)	::	b(ldb,*)
整型（kind=ilp），	intent(in)	::	ldb

公共纯子程序 ztrmm(side, uplo, transa, diag, m, n, alpha, a, lda, b, ldb)

参数

类型	意图		名称
字符型（len=1），	intent(in)	::	side
字符型（len=1），	intent(in)	::	uplo
字符型（len=1），	intent(in)	::	transa
字符型（len=1），	intent(in)	::	diag
整型（kind=ilp），	intent(in)	::	m
整型（kind=ilp），	intent(in)	::	n
复数型（kind=dp），	intent(in)	::	alpha
复数型（kind=dp），	intent(in)	::	a(lda,* )
整型（kind=ilp)，	intent(in)	::	lda
复数型（kind=dp），	intent(inout)	::	b(ldb,*)
整型（kind=ilp），	intent(in)	::	ldb

公共纯子程序 stdlib_ctrmm(side, uplo, transa, diag, m, n, alpha, a, lda, b, ldb)

CTRMM 执行以下矩阵-矩阵运算之一：B := alphaop( A )B 或 B := alphaBop( A )，其中 alpha 是一个标量，B 是一个 m×n 矩阵，A 是一个单位或非单位的上三角或下三角矩阵，op( A ) 是以下运算之一：op( A ) = A 或 op( A ) = AT 或 op( A ) = AH。

参数

类型	意图		名称
字符型（len=1），	intent(in)	::	side
字符型（len=1），	intent(in)	::	uplo
字符型（len=1），	intent(in)	::	transa
字符型（len=1），	intent(in)	::	diag
整型（kind=ilp），	intent(in)	::	m
整型（kind=ilp），	intent(in)	::	n
复数型（kind=sp），	intent(in)	::	alpha
复数型（kind=sp），	intent(in)	::	a(lda,* )
整型（kind=ilp），	intent(in)	::	lda
复数型（kind=sp），	intent(inout)	::	b(ldb,*)
整型（kind=ilp），	intent(in)	::	ldb

公共纯子程序 stdlib_dtrmm(side, uplo, transa, diag, m, n, alpha, a, lda, b, ldb)

DTRMM 执行以下矩阵-矩阵运算之一：B := alphaop( A )B 或 B := alphaBop( A )，其中 alpha 是一个标量，B 是一个 m×n 矩阵，A 是一个单位或非单位的上三角或下三角矩阵，op( A ) 是以下运算之一：op( A ) = A 或 op( A ) = A**T。

参数

类型	意图		名称
字符型（len=1），	intent(in)	::	side
字符型（len=1），	intent(in)	::	uplo
字符型（len=1），	intent(in)	::	transa
字符型（len=1），	intent(in)	::	diag
整型（kind=ilp），	intent(in)	::	m
整型（kind=ilp），	intent(in)	::	n
实数型（kind=dp），	intent(in)	::	alpha
实数型（kind=dp），	intent(in)	::	a(lda,* )
整型（kind=ilp），	intent(in)	::	lda
实数型（kind=dp），	intent(inout)	::	b(ldb,*)
整型（kind=ilp），	intent(in)	::	ldb

公共纯子程序 stdlib_strmm(side, uplo, transa, diag, m, n, alpha, a, lda, b, ldb)

STRMM 执行以下矩阵-矩阵运算之一：B := alphaop( A )B 或 B := alphaBop( A )，其中 alpha 是一个标量，B 是一个 m×n 矩阵，A 是一个单位或非单位的上三角或下三角矩阵，op( A ) 是以下运算之一：op( A ) = A 或 op( A ) = A**T。

参数

类型	意图		名称
字符型（len=1），	intent(in)	::	side
字符型（len=1），	intent(in)	::	uplo
字符型（len=1），	intent(in)	::	transa
字符型（len=1），	intent(in)	::	diag
整型（kind=ilp），	intent(in)	::	m
整型（kind=ilp），	intent(in)	::	n
实数型（kind=sp），	intent(in)	::	alpha
实数型（kind=sp），	intent(in)	::	a(lda,* )
整型（kind=ilp），	intent(in)	::	lda
实数型（kind=sp），	intent(inout)	::	b(ldb,*)
整型（kind=ilp），	intent(in)	::	ldb

公共纯子程序 stdlib_ztrmm(side, uplo, transa, diag, m, n, alpha, a, lda, b, ldb)

ZTRMM 执行以下矩阵-矩阵运算之一：B := alphaop( A )B 或 B := alphaBop( A )，其中 alpha 是一个标量，B 是一个 m×n 矩阵，A 是一个单位或非单位的上三角或下三角矩阵，op( A ) 是以下运算之一：op( A ) = A 或 op( A ) = AT 或 op( A ) = AH。

参数

类型	意图		名称
字符型（len=1），	intent(in)	::	side
字符型（len=1），	intent(in)	::	uplo
字符型（len=1），	intent(in)	::	transa
字符型（len=1），	intent(in)	::	diag
整型（kind=ilp），	intent(in)	::	m
整型（kind=ilp），	intent(in)	::	n
复数型（kind=dp），	intent(in)	::	alpha
复数型（kind=dp），	intent(in)	::	a(lda,* )
整型（kind=ilp），	intent(in)	::	lda
复数型（kind=dp），	intent(inout)	::	b(ldb,*)
整型（kind=ilp），	intent(in)	::	ldb

公共接口 trmv

TRMV 执行以下矩阵-向量运算之一：x := Ax 或 x := ATx 或 x := A*Hx，其中 x 是一个 n 元素向量，A 是一个 n×n 单位或非单位的上三角或下三角矩阵。

公共纯子程序 ctrmv(uplo, trans, diag, n, a, lda, x, incx)

参数

类型	意图		名称
字符型（len=1），	intent(in)	::	uplo
字符型（len=1），	intent(in)	::	trans
字符型（len=1），	intent(in)	::	diag
整型（kind=ilp），	intent(in)	::	n
复数型（kind=sp），	intent(in)	::	a(lda,* )
整型（kind=ilp），	intent(in)	::	lda
复数型（kind=sp），	intent(inout)	::	x(*)
整型（kind=ilp），	intent(in)	::	incx

公共纯子程序 dtrmv(uplo, trans, diag, n, a, lda, x, incx)

参数

类型	意图		名称
字符型（len=1），	intent(in)	::	uplo
字符型（len=1），	intent(in)	::	trans
字符型（len=1），	intent(in)	::	diag
整型（kind=ilp），	intent(in)	::	n
实数型（kind=dp），	intent(in)	::	a(lda,* )
整型（kind=ilp），	intent(in)	::	lda
实数型（kind=dp），	intent(inout)	::	x(*)
整型（kind=ilp），	intent(in)	::	incx

公共纯子程序 strmv(uplo, trans, diag, n, a, lda, x, incx)

参数

类型	意图		名称
字符型（len=1），	intent(in)	::	uplo
字符型（len=1），	intent(in)	::	trans
字符型（len=1），	intent(in)	::	diag
整型（kind=ilp），	intent(in)	::	n
实数型（kind=sp），	intent(in)	::	a(lda,* )
整型（kind=ilp），	intent(in)	::	lda
实数型（kind=sp），	intent(inout)	::	x(*)
整型（kind=ilp），	intent(in)	::	incx

公共纯子程序 ztrmv(uplo, trans, diag, n, a, lda, x, incx)

参数

类型	意图		名称
字符型（len=1），	intent(in)	::	uplo
字符型（len=1），	intent(in)	::	trans
字符型（len=1），	intent(in)	::	diag
整型（kind=ilp），	intent(in)	::	n
复数型（kind=dp），	intent(in)	::	a(lda,* )
整型（kind=ilp），	intent(in)	::	lda
复数型（kind=dp），	intent(inout)	::	x(*)
整型（kind=ilp），	intent(in)	::	incx

公共纯子程序 stdlib_ctrmv(uplo, trans, diag, n, a, lda, x, incx)

CTRMV 执行以下矩阵-向量运算之一：x := Ax 或 x := ATx 或 x := A*Hx，其中 x 是一个 n 元素向量，A 是一个 n×n 单位或非单位的上三角或下三角矩阵。

参数

类型	意图		名称
字符型（len=1），	intent(in)	::	uplo
字符型（len=1），	intent(in)	::	trans
字符型（len=1），	intent(in)	::	diag
整型（kind=ilp），	intent(in)	::	n
复数型（kind=sp），	intent(in)	::	a(lda,* )
整型（kind=ilp），	intent(in)	::	lda
复数型（kind=sp），	intent(inout)	::	x(*)
整型（kind=ilp），	intent(in)	::	incx

公共纯子程序 stdlib_dtrmv(uplo, trans, diag, n, a, lda, x, incx)

DTRMV 执行以下矩阵-向量运算之一：x := Ax 或 x := ATx，其中 x 是一个 n 元素向量，A 是一个 n×n 单位或非单位的上三角或下三角矩阵。

参数

类型	意图		名称
字符型（len=1），	intent(in)	::	uplo
字符型（len=1），	intent(in)	::	trans
字符型（len=1），	intent(in)	::	diag
整型（kind=ilp），	intent(in)	::	n
实数型（kind=dp），	intent(in)	::	a(lda,* )
整型（kind=ilp），	intent(in)	::	lda
实数型（kind=dp），	intent(inout)	::	x(*)
整型（kind=ilp），	intent(in)	::	incx

公共纯子程序 stdlib_strmv(uplo, trans, diag, n, a, lda, x, incx)

STRMV 执行以下矩阵-向量运算之一：x := Ax 或 x := ATx，其中 x 是一个 n 元素向量，A 是一个 n×n 单位或非单位的上三角或下三角矩阵。

参数

类型	意图		名称
字符型（len=1），	intent(in)	::	uplo
字符型（len=1），	intent(in)	::	trans
字符型（len=1），	intent(in)	::	diag
整型（kind=ilp），	intent(in)	::	n
实数型（kind=sp），	intent(in)	::	a(lda,* )
整型（kind=ilp），	intent(in)	::	lda
实数型（kind=sp），	intent(inout)	::	x(*)
整型（kind=ilp），	intent(in)	::	incx

public pure subroutine stdlib_ztrmv(uplo, trans, diag, n, a, lda, x, incx)

ZTRMV 执行以下矩阵-向量运算之一：x := A*x、x := A**T*x 或 x := A**H*x，其中 x 是一个 n 元素向量，A 是一个 n×n 的单位或非单位上三角或下三角矩阵。

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	trans
character(len=1),	intent(in)	::	diag
integer(kind=ilp),	intent(in)	::	n
complex(kind=dp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
complex(kind=dp),	intent(inout)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx

public interface trsm

TRSM 求解以下矩阵方程之一：op( A )*X = alpha*B 或 X*op( A ) = alpha*B，其中 alpha 是一个标量，X 和 B 是 m×n 矩阵，A 是一个单位或非单位上三角或下三角矩阵，op( A ) 是以下之一：op( A ) = A 或 op( A ) = A**T 或 op( A ) = A**H。矩阵 X 将覆盖 B。

public pure subroutine ctrsm(side, uplo, transa, diag, m, n, alpha, a, lda, b, ldb)

参数

类型	意图		名称
character(len=1),	intent(in)	::	side
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	transa
character(len=1),	intent(in)	::	diag
integer(kind=ilp),	intent(in)	::	m
integer(kind=ilp),	intent(in)	::	n
complex(kind=sp),	intent(in)	::	alpha
complex(kind=sp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
complex(kind=sp),	intent(inout)	::	b(ldb,*)
integer(kind=ilp),	intent(in)	::	ldb

public pure subroutine dtrsm(side, uplo, transa, diag, m, n, alpha, a, lda, b, ldb)

参数

类型	意图		名称
character(len=1),	intent(in)	::	side
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	transa
character(len=1),	intent(in)	::	diag
integer(kind=ilp),	intent(in)	::	m
integer(kind=ilp),	intent(in)	::	n
real(kind=dp),	intent(in)	::	alpha
real(kind=dp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
real(kind=dp),	intent(inout)	::	b(ldb,*)
integer(kind=ilp),	intent(in)	::	ldb

public pure subroutine strsm(side, uplo, transa, diag, m, n, alpha, a, lda, b, ldb)

参数

类型	意图		名称
character(len=1),	intent(in)	::	side
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	transa
character(len=1),	intent(in)	::	diag
integer(kind=ilp),	intent(in)	::	m
integer(kind=ilp),	intent(in)	::	n
real(kind=sp),	intent(in)	::	alpha
real(kind=sp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
real(kind=sp),	intent(inout)	::	b(ldb,*)
integer(kind=ilp),	intent(in)	::	ldb

public pure subroutine ztrsm(side, uplo, transa, diag, m, n, alpha, a, lda, b, ldb)

参数

类型	意图		名称
character(len=1),	intent(in)	::	side
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	transa
character(len=1),	intent(in)	::	diag
integer(kind=ilp),	intent(in)	::	m
integer(kind=ilp),	intent(in)	::	n
complex(kind=dp),	intent(in)	::	alpha
complex(kind=dp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
complex(kind=dp),	intent(inout)	::	b(ldb,*)
integer(kind=ilp),	intent(in)	::	ldb

public pure subroutine stdlib_ctrsm(side, uplo, transa, diag, m, n, alpha, a, lda, b, ldb)

CTRSM 求解以下矩阵方程之一：op( A )*X = alpha*B 或 X*op( A ) = alpha*B，其中 alpha 是一个标量，X 和 B 是 m×n 矩阵，A 是一个单位或非单位上三角或下三角矩阵，op( A ) 是以下之一：op( A ) = A 或 op( A ) = A**T 或 op( A ) = A**H。矩阵 X 将覆盖 B。

参数

类型	意图		名称
character(len=1),	intent(in)	::	side
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	transa
character(len=1),	intent(in)	::	diag
integer(kind=ilp),	intent(in)	::	m
integer(kind=ilp),	intent(in)	::	n
complex(kind=sp),	intent(in)	::	alpha
complex(kind=sp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
complex(kind=sp),	intent(inout)	::	b(ldb,*)
integer(kind=ilp),	intent(in)	::	ldb

public pure subroutine stdlib_dtrsm(side, uplo, transa, diag, m, n, alpha, a, lda, b, ldb)

DTRSM 求解以下矩阵方程之一：op( A )*X = alpha*B 或 X*op( A ) = alpha*B，其中 alpha 是一个标量，X 和 B 是 m×n 矩阵，A 是一个单位或非单位上三角或下三角矩阵，op( A ) 是以下之一：op( A ) = A 或 op( A ) = A**T。矩阵 X 将覆盖 B。

参数

类型	意图		名称
character(len=1),	intent(in)	::	side
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	transa
character(len=1),	intent(in)	::	diag
integer(kind=ilp),	intent(in)	::	m
integer(kind=ilp),	intent(in)	::	n
real(kind=dp),	intent(in)	::	alpha
real(kind=dp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
real(kind=dp),	intent(inout)	::	b(ldb,*)
integer(kind=ilp),	intent(in)	::	ldb

public pure subroutine stdlib_strsm(side, uplo, transa, diag, m, n, alpha, a, lda, b, ldb)

STRSM 求解以下矩阵方程之一：op( A )*X = alpha*B 或 X*op( A ) = alpha*B，其中 alpha 是一个标量，X 和 B 是 m×n 矩阵，A 是一个单位或非单位上三角或下三角矩阵，op( A ) 是以下之一：op( A ) = A 或 op( A ) = A**T。矩阵 X 将覆盖 B。

参数

类型	意图		名称
character(len=1),	intent(in)	::	side
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	transa
character(len=1),	intent(in)	::	diag
integer(kind=ilp),	intent(in)	::	m
integer(kind=ilp),	intent(in)	::	n
real(kind=sp),	intent(in)	::	alpha
real(kind=sp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
real(kind=sp),	intent(inout)	::	b(ldb,*)
integer(kind=ilp),	intent(in)	::	ldb

public pure subroutine stdlib_ztrsm(side, uplo, transa, diag, m, n, alpha, a, lda, b, ldb)

ZTRSM 求解以下矩阵方程之一：op( A )*X = alpha*B 或 X*op( A ) = alpha*B，其中 alpha 是一个标量，X 和 B 是 m×n 矩阵，A 是一个单位或非单位上三角或下三角矩阵，op( A ) 是以下之一：op( A ) = A 或 op( A ) = A**T 或 op( A ) = A**H。矩阵 X 将覆盖 B。

参数

类型	意图		名称
character(len=1),	intent(in)	::	side
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	transa
character(len=1),	intent(in)	::	diag
integer(kind=ilp),	intent(in)	::	m
integer(kind=ilp),	intent(in)	::	n
complex(kind=dp),	intent(in)	::	alpha
complex(kind=dp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
complex(kind=dp),	intent(inout)	::	b(ldb,*)
integer(kind=ilp),	intent(in)	::	ldb

public interface trsv

TRSV 求解以下方程组之一：A*x = b、A**T*x = b 或 A**H*x = b，其中 b 和 x 是 n 元素向量，A 是一个 n×n 的单位或非单位上三角或下三角矩阵。此例程不包含奇异性或接近奇异性的测试。必须在调用此例程之前执行此类测试。

public pure subroutine ctrsv(uplo, trans, diag, n, a, lda, x, incx)

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	trans
character(len=1),	intent(in)	::	diag
integer(kind=ilp),	intent(in)	::	n
complex(kind=sp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
complex(kind=sp),	intent(inout)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx

public pure subroutine dtrsv(uplo, trans, diag, n, a, lda, x, incx)

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	trans
character(len=1),	intent(in)	::	diag
integer(kind=ilp),	intent(in)	::	n
real(kind=dp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
real(kind=dp),	intent(inout)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx

public pure subroutine strsv(uplo, trans, diag, n, a, lda, x, incx)

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	trans
character(len=1),	intent(in)	::	diag
integer(kind=ilp),	intent(in)	::	n
real(kind=sp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
real(kind=sp),	intent(inout)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx

public pure subroutine ztrsv(uplo, trans, diag, n, a, lda, x, incx)

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	trans
character(len=1),	intent(in)	::	diag
integer(kind=ilp),	intent(in)	::	n
complex(kind=dp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
complex(kind=dp),	intent(inout)	::	x(*)
integer(kind=ilp),	intent(in)	::	incx

public pure subroutine stdlib_ctrsv(uplo, trans, diag, n, a, lda, x, incx)

CTRSV 求解以下方程组之一：A*x = b、A**T*x = b 或 A**H*x = b，其中 b 和 x 是 n 元素向量，A 是一个 n×n 的单位或非单位上三角或下三角矩阵。此例程不包含奇异性或接近奇异性的测试。必须在调用此例程之前执行此类测试。

参数

类型	意图		名称
character(len=1),	intent(in)	::	uplo
character(len=1),	intent(in)	::	trans
character(len=1),	intent(in)	::	diag
integer(kind=ilp),	intent(in)	::	n
complex(kind=sp),	intent(in)	::	a(lda,* )
integer(kind=ilp),	intent(in)	::	lda
复数型 (kind=sp),	intent(inout)	::	x(*)
整型 (kind=ilp),	intent(in)	::	incx

公共纯子程序 stdlib_dtrsv(uplo, trans, diag, n, a, lda, x, incx)

DTRSV 求解以下方程组之一：A*x = b 或 A^Tx = b，其中 b 和 x 是 n 元素向量，A 是 n×n 的单位或非单位上三角或下三角矩阵。此例程未包含奇异性或近奇异性的检验。在调用此例程之前，必须执行此类检验。

参数

类型	意图		名称
字符型 (len=1),	intent(in)	::	uplo
字符型 (len=1),	intent(in)	::	trans
字符型 (len=1),	intent(in)	::	diag
整型 (kind=ilp),	intent(in)	::	n
实数型 (kind=dp),	intent(in)	::	a(lda,* )
整型 (kind=ilp),	intent(in)	::	lda
实数型 (kind=dp),	intent(inout)	::	x(*)
整型 (kind=ilp),	intent(in)	::	incx

公共纯子程序 stdlib_strsv(uplo, trans, diag, n, a, lda, x, incx)

STRSV 求解以下方程组之一：A*x = b 或 A^Tx = b，其中 b 和 x 是 n 元素向量，A 是 n×n 的单位或非单位上三角或下三角矩阵。此例程未包含奇异性或近奇异性的检验。在调用此例程之前，必须执行此类检验。

参数

类型	意图		名称
字符型 (len=1),	intent(in)	::	uplo
字符型 (len=1),	intent(in)	::	trans
字符型 (len=1),	intent(in)	::	diag
整型 (kind=ilp),	intent(in)	::	n
实数型 (kind=sp),	intent(in)	::	a(lda,* )
整型 (kind=ilp),	intent(in)	::	lda
实数型 (kind=sp),	intent(inout)	::	x(*)
整型 (kind=ilp),	intent(in)	::	incx

公共纯子程序 stdlib_ztrsv(uplo, trans, diag, n, a, lda, x, incx)

ZTRSV 求解以下方程组之一：A*x = b 或 A^Tx = b 或 A^Hx = b，其中 b 和 x 是 n 元素向量，A 是 n×n 的单位或非单位上三角或下三角矩阵。此例程未包含奇异性或近奇异性的检验。在调用此例程之前，必须执行此类检验。

参数

类型	意图		名称
字符型 (len=1),	intent(in)	::	uplo
字符型 (len=1),	intent(in)	::	trans
字符型 (len=1),	intent(in)	::	diag
整型 (kind=ilp),	intent(in)	::	n
复数型 (kind=dp),	intent(in)	::	a(lda,* )
整型 (kind=ilp),	intent(in)	::	lda
复数型 (kind=dp),	intent(inout)	::	x(*)
整型 (kind=ilp),	intent(in)	::	incx

stdlib_linalg_blas 模块

内容

接口

使用

接口

公共接口 axpy

公共纯子程序 caxpy(n, ca, cx, incx, cy, incy)

参数

公共纯子程序 daxpy(n, da, dx, incx, dy, incy)

参数

公共纯子程序 saxpy(n, sa, sx, incx, sy, incy)

参数

公共纯子程序 zaxpy(n, za, zx, incx, zy, incy)

参数

公共纯子程序 stdlib_caxpy(n, ca, cx, incx, cy, incy)

参数

公共纯子程序 stdlib_daxpy(n, da, dx, incx, dy, incy)

参数

公共纯子程序 stdlib_saxpy(n, sa, sx, incx, sy, incy)

参数

公共纯子程序 stdlib_zaxpy(n, za, zx, incx, zy, incy)

参数

公共接口 copy

公共纯子程序 ccopy(n, cx, incx, cy, incy)

参数

公共纯子程序 dcopy(n, dx, incx, dy, incy)

参数

公共纯子程序 scopy(n, sx, incx, sy, incy)

参数

公共纯子程序 zcopy(n, zx, incx, zy, incy)

参数

公共纯子程序 stdlib_ccopy(n, cx, incx, cy, incy)

参数

公共纯子程序 stdlib_dcopy(n, dx, incx, dy, incy)

参数

公共纯子程序 stdlib_scopy(n, sx, incx, sy, incy)

参数

公共纯子程序 stdlib_zcopy(n, zx, incx, zy, incy)

参数

公共接口 dot

公共纯函数 ddot(n, dx, incx, dy, incy)

参数

返回值 real(kind=dp)

公共纯函数 sdot(n, sx, incx, sy, incy)

参数

返回值 real(kind=sp)

公共纯函数 stdlib_ddot(n, dx, incx, dy, incy)

参数

返回值 real(kind=dp)

公共纯函数 stdlib_sdot(n, sx, incx, sy, incy)

参数

返回值 real(kind=sp)

公共接口 dotc

公共纯函数 cdotc(n, cx, incx, cy, incy)

参数

返回值 复数(kind=sp)

公共纯函数 zdotc(n, zx, incx, zy, incy)

参数

返回值 复数(kind=dp)

公共纯函数 stdlib_cdotc(n, cx, incx, cy, incy)

参数

返回值 复数(kind=sp)

公共纯函数 stdlib_zdotc(n, zx, incx, zy, incy)

参数

返回值 复数(kind=dp)

公共接口 dotu

公共纯函数 cdotu(n, cx, incx, cy, incy)

参数

返回值 复数(kind=sp)

公共纯函数 zdotu(n, zx, incx, zy, incy)

参数

返回值 复数(kind=dp)

公共纯函数 stdlib_cdotu(n, cx, incx, cy, incy)

参数

返回值 复数(kind=sp)

公共纯函数 stdlib_zdotu(n, zx, incx, zy, incy)

参数

返回值 复数(kind=dp)

公共接口 gbmv

公共纯子程序 cgbmv(trans, m, n, kl, ku, alpha, a, lda, x, incx, beta, y, incy)

返回值复数(kind=sp)

返回值复数(kind=dp)

返回值复数(kind=sp)

返回值复数(kind=dp)

返回值复数(kind=sp)

返回值复数(kind=dp)

返回值复数(kind=sp)

返回值复数(kind=dp)