blas/testblas: rename packHermitian and unpackHermitian
MODIFY
blas/testblas/common_test.go
blas/testblas/common_test.go
@@ -189,7 +189,7 @@ func TestFlattenTriangular(t *testing.T) {
}
}
-func TestPackUnpackHermitian(t *testing.T) {
+func TestPackUnpackAsHermitian(t *testing.T) {
rnd := rand.New(rand.NewSource(1))
for _, uplo := range []blas.Uplo{blas.Upper, blas.Lower} {
for _, n := range []int{1, 2, 5, 50} {
@@ -206,17 +206,17 @@ func TestPackUnpackHermitian(t *testing.T) {
aCopy := make([]complex128, len(a))
copy(aCopy, a)
- ap := packHermitian(uplo, n, a, lda)
+ ap := zPack(uplo, n, a, lda)
if !zsame(a, aCopy) {
- t.Errorf("Case uplo=%v,n=%v,lda=%v: packHermitian modified a", uplo, n, lda)
+ t.Errorf("Case uplo=%v,n=%v,lda=%v: zPack modified a", uplo, n, lda)
}
apCopy := make([]complex128, len(ap))
copy(apCopy, ap)
- art := unpackHermitian(uplo, n, ap)
+ art := zUnpackAsHermitian(uplo, n, ap)
if !zsame(ap, apCopy) {
- t.Errorf("Case uplo=%v,n=%v,lda=%v: unpackHermitian modified ap", uplo, n, lda)
+ t.Errorf("Case uplo=%v,n=%v,lda=%v: zUnpackAsHermitian modified ap", uplo, n, lda)
}
// Copy the round-tripped A into a matrix with the same stride
@@ -226,7 +226,7 @@ func TestPackUnpackHermitian(t *testing.T) {
copy(got[i*lda:i*lda+n], art[i*n:i*n+n])
}
if !zsame(got, a) {
- t.Errorf("Case uplo=%v,n=%v,lda=%v: packHermitian and unpackHermitian do not roundtrip", uplo, n, lda)
+ t.Errorf("Case uplo=%v,n=%v,lda=%v: zPack and zUnpackAsHermitian do not roundtrip", uplo, n, lda)
}
}
}

MODIFY
blas/testblas/zhpmv.go
blas/testblas/zhpmv.go
@@ -28,7 +28,7 @@ func ZhpmvTest(t *testing.T, impl Zhpmver) {
y := makeZVector(test.y, incY)
- ap := packHermitian(uplo, n, test.a, n)
+ ap := zPack(uplo, n, test.a, n)
apCopy := make([]complex128, len(ap))
copy(apCopy, ap)

MODIFY
blas/testblas/zhpr.go
blas/testblas/zhpr.go
@@ -23,9 +23,9 @@ func ZhprTest(t *testing.T, impl Zhprer) {
xCopy := make([]complex128, len(x))
copy(xCopy, x)
- ap := packHermitian(uplo, n, test.a, n)
+ ap := zPack(uplo, n, test.a, n)
impl.Zhpr(uplo, n, test.alpha, x, incX, ap)
- a := unpackHermitian(uplo, n, ap)
+ a := zUnpackAsHermitian(uplo, n, ap)
var want []complex128
if incX > 0 {

MODIFY
blas/testblas/zhpr2.go
blas/testblas/zhpr2.go
@@ -28,9 +28,9 @@ func Zhpr2Test(t *testing.T, impl Zhpr2er) {
yCopy := make([]complex128, len(y))
copy(yCopy, y)
- ap := packHermitian(uplo, n, test.a, n)
+ ap := zPack(uplo, n, test.a, n)
impl.Zhpr2(uplo, n, test.alpha, x, incX, y, incY, ap)
- a := unpackHermitian(uplo, n, ap)
+ a := zUnpackAsHermitian(uplo, n, ap)
if !zsame(x, xCopy) {
t.Errorf("Case %v (uplo=%v,incX=%v,incY=%v): unexpected modification of x", tc, uplo, incX, incY)

blas/testblas: rename packHermitian and unpackHermitian