1
1
using Test
2
2
using BlockSparseArrays
3
- using BlockSparseArrays: BlockSparseArray, svd, notrunc, truncbelow, truncdim, BlockDiagonal
3
+ using BlockSparseArrays: BlockSparseArray, svd, BlockDiagonal
4
4
using BlockArrays
5
5
using LinearAlgebra: LinearAlgebra, Diagonal, svdvals
6
6
using Random
@@ -58,8 +58,8 @@ test_svd(a, usv)
58
58
59
59
# blocksparse
60
60
# -----------
61
- @testset " ($m , $n ) BlockDiagonal {$T }" for ((m, n), T) in
62
- Iterators. product (blockszs, eltypes)
61
+ @testset " ($m , $n ) BlockSparseMatrix {$T }" for ((m, n), T) in
62
+ Iterators. product (blockszs, eltypes)
63
63
a = BlockSparseArray {T} (m, n)
64
64
for i in LinearAlgebra. diagind (blocks (a))
65
65
I = CartesianIndices (blocks (a))[i]
@@ -72,12 +72,4 @@ test_svd(a, usv)
72
72
usv = svd (a)
73
73
# TODO : `BlockDiagonal * Adjoint` errors
74
74
test_svd (a, usv)
75
- @test usv. U isa BlockDiagonal
76
- @test usv. Vt isa BlockDiagonal
77
- @test usv. S isa BlockVector
78
-
79
- test_svd (a, usv2)
80
- @test usv. U isa BlockDiagonal
81
- @test usv. Vt isa BlockDiagonal
82
- @test usv. S isa BlockVector
83
75
end
0 commit comments