blas/gonum: add Ztbmv
MODIFY
blas/gonum/cmplx.go
blas/gonum/cmplx.go
@@ -135,9 +135,6 @@ func (Implementation) Cher2k(ul blas.Uplo, t blas.Transpose, n, k int, alpha com
// Level 2 complex128 routines.
-func (Implementation) Ztbmv(ul blas.Uplo, tA blas.Transpose, d blas.Diag, n, k int, a []complex128, lda int, x []complex128, incX int) {
- panic(noComplex)
-}
func (Implementation) Ztbsv(ul blas.Uplo, tA blas.Transpose, d blas.Diag, n, k int, a []complex128, lda int, x []complex128, incX int) {
panic(noComplex)
}

MODIFY
blas/gonum/gonum.go
blas/gonum/gonum.go
@@ -146,6 +146,21 @@ func checkZhbMatrix(name byte, n, k int, ab []complex128, ldab int) {
}
}
+func checkZtbMatrix(name byte, n, k int, ab []complex128, ldab int) {
+ if n < 0 {
+ panic(nLT0)
+ }
+ if k < 0 {
+ panic(kLT0)
+ }
+ if ldab < k+1 {
+ panic("blas: illegal stride of triangular band matrix " + string(name))
+ }
+ if len(ab) < (n-1)*ldab+k+1 {
+ panic("blas: insufficient " + string(name) + " triangular band matrix slice length")
+ }
+}
+
func checkZVector(name byte, n int, x []complex128, incX int) {
if n < 0 {
panic(nLT0)

blas/gonum: add Ztbmv