Skip to content
Merged
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
13 changes: 8 additions & 5 deletions src/dense.jl
Original file line number Diff line number Diff line change
Expand Up @@ -1587,24 +1587,25 @@ factorize(A::Transpose) = transpose(factorize(parent(A)))
factorize(a::Number) = a # same as how factorize behaves on Diagonal types

function getstructure(A::StridedMatrix)
require_one_based_indexing(A)
m, n = size(A)
if m == 1 return A[1] end
utri = true
utri1 = true
herm = true
sym = true
for j = 1:n-1, i = j+1:m
if utri1
for j = 1:n, i = j:m
if (j < n) && (i > j) && utri1 # indices are off-diagonal
if A[i,j] != 0
utri1 = i == j + 1
utri = false
end
end
if sym
sym &= A[i,j] == A[j,i]
sym &= A[i,j] == transpose(A[j,i])
end
if herm
herm &= A[i,j] == conj(A[j,i])
herm &= A[i,j] == adjoint(A[j,i])
end
if !(utri1|herm|sym) break end
end
Expand All @@ -1617,10 +1618,12 @@ function getstructure(A::StridedMatrix)
if ltri1
for i = 1:n-1
if A[i,i+1] != 0
ltri &= false
ltri = false
break
end
end
else
ltri = false
end
return (utri, utri1, ltri, ltri1, sym, herm)
end
Expand Down
7 changes: 7 additions & 0 deletions test/dense.jl
Original file line number Diff line number Diff line change
Expand Up @@ -1347,4 +1347,11 @@ end
end
end

@testset "structure of dense matrices" begin
# A is neither triangular nor symmetric/Hermitian
A = [1 im 2; -im 0 3; 2 3 im]
@test factorize(A) isa LU{ComplexF64, Matrix{ComplexF64}, Vector{Int}}
@test !any(LinearAlgebra.getstructure(A))
end

end # module TestDense
Loading