@@ -81,36 +81,39 @@ guardsrand(123) do
8181 @test Array (convert (SymTridiagonal{Complex64},Tridiagonal (SymTridiagonal (d, dl)))) == convert (Matrix{Complex64}, SymTridiagonal (d, dl))
8282 end
8383 @testset " tril/triu" begin
84+ zerosd = fill! (similar (d), 0 )
85+ zerosdl = fill! (similar (dl), 0 )
86+ zerosdu = fill! (similar (du), 0 )
8487 @test_throws ArgumentError tril! (SymTridiagonal (d, dl), - n - 2 )
8588 @test_throws ArgumentError tril! (SymTridiagonal (d, dl), n)
8689 @test_throws ArgumentError tril! (Tridiagonal (dl, d, du), - n - 2 )
8790 @test_throws ArgumentError tril! (Tridiagonal (dl, d, du), n)
88- @test tril (SymTridiagonal (d,dl)) == Tridiagonal (dl,d,zeros (dl) )
91+ @test tril (SymTridiagonal (d,dl)) == Tridiagonal (dl,d,zerosdl )
8992 @test tril (SymTridiagonal (d,dl),1 ) == Tridiagonal (dl,d,dl)
90- @test tril (SymTridiagonal (d,dl),- 1 ) == Tridiagonal (dl,zeros (d), zeros (dl) )
91- @test tril (SymTridiagonal (d,dl),- 2 ) == Tridiagonal (zeros (dl), zeros (d), zeros (dl) )
92- @test tril (Tridiagonal (dl,d,du)) == Tridiagonal (dl,d,zeros (du) )
93+ @test tril (SymTridiagonal (d,dl),- 1 ) == Tridiagonal (dl,zerosd,zerosdl )
94+ @test tril (SymTridiagonal (d,dl),- 2 ) == Tridiagonal (zerosdl,zerosd,zerosdl )
95+ @test tril (Tridiagonal (dl,d,du)) == Tridiagonal (dl,d,zerosdu )
9396 @test tril (Tridiagonal (dl,d,du),1 ) == Tridiagonal (dl,d,du)
94- @test tril (Tridiagonal (dl,d,du),- 1 ) == Tridiagonal (dl,zeros (d), zeros (du) )
95- @test tril (Tridiagonal (dl,d,du),- 2 ) == Tridiagonal (zeros (dl), zeros (d), zeros (du) )
97+ @test tril (Tridiagonal (dl,d,du),- 1 ) == Tridiagonal (dl,zerosd,zerosdu )
98+ @test tril (Tridiagonal (dl,d,du),- 2 ) == Tridiagonal (zerosdl,zerosd,zerosdu )
9699
97100 @test_throws ArgumentError triu! (SymTridiagonal (d, dl), - n)
98101 @test_throws ArgumentError triu! (SymTridiagonal (d, dl), n + 2 )
99102 @test_throws ArgumentError triu! (Tridiagonal (dl, d, du), - n)
100103 @test_throws ArgumentError triu! (Tridiagonal (dl, d, du), n + 2 )
101- @test triu (SymTridiagonal (d,dl)) == Tridiagonal (zeros (dl) ,d,dl)
104+ @test triu (SymTridiagonal (d,dl)) == Tridiagonal (zerosdl ,d,dl)
102105 @test triu (SymTridiagonal (d,dl),- 1 ) == Tridiagonal (dl,d,dl)
103- @test triu (SymTridiagonal (d,dl),1 ) == Tridiagonal (zeros (dl), zeros (d) ,dl)
104- @test triu (SymTridiagonal (d,dl),2 ) == Tridiagonal (zeros (dl), zeros (d), zeros (dl) )
105- @test triu (Tridiagonal (dl,d,du)) == Tridiagonal (zeros (dl) ,d,du)
106+ @test triu (SymTridiagonal (d,dl),1 ) == Tridiagonal (zerosdl,zerosd ,dl)
107+ @test triu (SymTridiagonal (d,dl),2 ) == Tridiagonal (zerosdl,zerosd,zerosdl )
108+ @test triu (Tridiagonal (dl,d,du)) == Tridiagonal (zerosdl ,d,du)
106109 @test triu (Tridiagonal (dl,d,du),- 1 ) == Tridiagonal (dl,d,du)
107- @test triu (Tridiagonal (dl,d,du),1 ) == Tridiagonal (zeros (dl), zeros (d) ,du)
108- @test triu (Tridiagonal (dl,d,du),2 ) == Tridiagonal (zeros (dl), zeros (d), zeros (du) )
110+ @test triu (Tridiagonal (dl,d,du),1 ) == Tridiagonal (zerosdl,zerosd ,du)
111+ @test triu (Tridiagonal (dl,d,du),2 ) == Tridiagonal (zerosdl,zerosd,zerosdu )
109112
110113 @test ! istril (SymTridiagonal (d,dl))
111114 @test ! istriu (SymTridiagonal (d,dl))
112- @test istriu (Tridiagonal (zeros (dl) ,d,du))
113- @test istril (Tridiagonal (dl,d,zeros (du) ))
115+ @test istriu (Tridiagonal (zerosdl ,d,du))
116+ @test istril (Tridiagonal (dl,d,zerosdu ))
114117 end
115118
116119 @testset for mat_type in (Tridiagonal, SymTridiagonal)
@@ -212,8 +215,8 @@ guardsrand(123) do
212215 @test A* LowerTriangular (Matrix (1.0 I, n, n)) ≈ fA
213216 end
214217 @testset " A_mul_B! errors" begin
215- @test_throws DimensionMismatch Base. LinAlg. A_mul_B! (zeros (fA),A,ones (elty,n,n+ 1 ))
216- @test_throws DimensionMismatch Base. LinAlg. A_mul_B! (zeros (fA),A,ones (elty,n+ 1 ,n))
218+ @test_throws DimensionMismatch Base. LinAlg. A_mul_B! (similar (fA),A,ones (elty,n,n+ 1 ))
219+ @test_throws DimensionMismatch Base. LinAlg. A_mul_B! (similar (fA),A,ones (elty,n+ 1 ,n))
217220 @test_throws DimensionMismatch A_mul_B! (zeros (elty,n,n),B,ones (elty,n+ 1 ,n))
218221 @test_throws DimensionMismatch A_mul_B! (zeros (elty,n+ 1 ,n),B,ones (elty,n,n))
219222 @test_throws DimensionMismatch A_mul_B! (zeros (elty,n,n+ 1 ),B,ones (elty,n,n))
0 commit comments