Skip to content
This repository was archived by the owner on Nov 24, 2018. It is now read-only.

Commit 1ac1d1e

Browse files
committed
PR request response
1 parent 1d7c90d commit 1ac1d1e

File tree

1 file changed

+4
-2
lines changed

1 file changed

+4
-2
lines changed

native/dsytrd.go

Lines changed: 4 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -15,7 +15,7 @@ import (
1515
// where Q is an orthonormal matrix and T is symmetric and tridiagonal.
1616
//
1717
// On entry, a contains the elements of the input matrix in the triangle specified
18-
// by uplo. On exit, the diagonal and sub/superdiagonal are overwritten by the
18+
// by uplo. On exit, the diagonal and sub/super-diagonal are overwritten by the
1919
// corresponding elements of the tridiagonal matrix T. The remaining elements in
2020
// the triangle, along with the array tau, contain the data to construct Q as
2121
// the product of elementary reflectors.
@@ -100,6 +100,7 @@ func (impl Implementation) Dsytrd(uplo blas.Uplo, n int, a []float64, lda int, d
100100
nb = 1
101101
}
102102
ldwork = nb
103+
103104
if upper {
104105
// Reduce the upper triangle of A. Columns 0:kk are handled by the
105106
// unblocked method.
@@ -133,7 +134,8 @@ func (impl Implementation) Dsytrd(uplo blas.Uplo, n int, a []float64, lda int, d
133134

134135
// Update the unreduced submatrix A[i+ib:n, i+ib:n], using an update
135136
// of the form A -= V*W^T - W*V^T.
136-
bi.Dsyr2k(uplo, blas.NoTrans, n-i-nb, nb, -1, a[(i+nb)*lda+i:], lda, work[nb+i:], ldwork, 1, a[(i+nb)*lda+i+nb:], lda)
137+
bi.Dsyr2k(uplo, blas.NoTrans, n-i-nb, nb, -1, a[(i+nb)*lda+i:], lda,
138+
work[nb+i:], ldwork, 1, a[(i+nb)*lda+i+nb:], lda)
137139

138140
// Copy subdiagonal elements back into A, and diagonal elements into D.
139141
for j := i; j < i+nb; j++ {

0 commit comments

Comments
 (0)