kalmar/PropertyT.jl
1
0
Fork 0
mirror of https://github.com/kalmarek/PropertyT.jl.git synced 2024-11-26 00:55:27 +01:00
Code Issues Releases Wiki Activity

make sure Q'*Q hits the fast path for IntervalMatrices

Browse Source
This commit is contained in:
Marek Kaluba 2024-02-19 18:20:35 +01:00
parent cd90e072c4
commit c7491f37f9
No known key found for this signature in database
GPG Key ID: 8BF1A3855328FC15
1 changed files with 8 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
src/certify.jl
View File

@ -8,7 +8,7 @@ function augment_columns!(Q::AbstractMatrix)
return Q
end
function __sos_via_sqr!(
function __sos_via_square!(
res::SA.AlgebraElement,
P::AbstractMatrix;
augmented::Bool,
@ -50,14 +50,19 @@ function __sos_via_cnstr!(
return res
end
__square(Q::AbstractMatrix) = Q' * Q
function __square(Q::IntervalMatrices.IntervalMatrix)
return *(IntervalMatrices.MultiplicationType{:fast}(), Q', Q)
end
function compute_sos(
A::SA.StarAlgebra,
Q::AbstractMatrix;
augmented::Bool,
)
Q² = Q' * Q
Q² = __square(Q)
res = SA.AlgebraElement(zeros(eltype(Q²), length(SA.basis(A))), A)
res = __sos_via_sqr!(res, Q²; augmented = augmented)
res = __sos_via_square!(res, Q²; augmented = augmented)
return res
end