6 "gonum.org/v1/gonum/blas"
7 "gonum.org/v1/gonum/floats"
10 type Dtrmver interface {
11 Dtrmv(ul blas.Uplo, tA blas.Transpose, d blas.Diag, n int, a []float64, lda int, x []float64, incX int)
14 func DtrmvTest(t *testing.T, blasser Dtrmver) {
15 for i, test := range []struct {
49 x: []float64{3, 4, 5},
53 ans: []float64{74, 86, 65},
62 x: []float64{3, 4, 5},
66 ans: []float64{62, 54, 5},
75 x: []float64{3, 4, 5},
79 ans: []float64{15, 54, 126},
88 x: []float64{3, 4, 5},
92 ans: []float64{3, 22, 66},
101 x: []float64{3, 4, 5},
105 ans: []float64{15, 54, 126},
114 x: []float64{3, 4, 5},
118 ans: []float64{3, 22, 66},
127 x: []float64{3, 4, 5},
131 ans: []float64{74, 86, 65},
134 incTest := func(incX, extra int) {
135 aFlat := flatten(test.a)
136 x := makeIncremented(test.x, incX, extra)
137 blasser.Dtrmv(test.ul, test.tA, test.d, test.n, aFlat, test.n, x, incX)
138 ans := makeIncremented(test.ans, incX, extra)
139 if !floats.EqualApprox(x, ans, 1e-14) {
140 t.Errorf("Case %v, idx %v: Want %v, got %v.", i, incX, ans, x)