Skip to content
Merged
Show file tree
Hide file tree
Changes from 2 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
2 changes: 1 addition & 1 deletion src/pullbacks/lq.jl
Original file line number Diff line number Diff line change
Expand Up @@ -13,8 +13,8 @@ function check_and_prepare_lq_cotangents(
size(ΔQ) == size(Q) || throw(DimensionMismatch("ΔQ must have the same size as Q"))
ΔQ₁ .= view(ΔQ, 1:p, 1:n)
if p == minmn # full rank case, ΔQ₃ contains gauge-invariant information along Q₁
ΔQ₃ = ΔQ[(minmn + 1):size(Q, 1), :] # extra columns in the case of qr_full
Q₃ = view(Q, (minmn + 1):size(Q, 1), :)
ΔQ₃ = view(ΔQ, (minmn + 1):size(Q, 1), :)
ΔQ₃Q₁ᴴ = ΔQ₃ * Q₁'
mul!(ΔQ₃, ΔQ₃Q₁ᴴ, Q₁, -1, 1)
Δgauge_Q = norm(ΔQ₃, Inf)
Expand Down
1 change: 0 additions & 1 deletion src/pullbacks/qr.jl
Original file line number Diff line number Diff line change
Expand Up @@ -15,7 +15,6 @@ function check_and_prepare_qr_cotangents(
ΔQ₁ .= view(ΔQ, 1:m, 1:p)
if p == minmn # full rank case, ΔQ₃ contains gauge-invariant information along Q₁
ΔQ₃ = ΔQ[:, (minmn + 1):size(Q, 2)] # extra columns in the case of qr_full
Q₁ = view(Q, :, 1:minmn)
Q₃ = view(Q, :, (minmn + 1):size(Q, 2))
Q₁ᴴΔQ₃ = Q₁' * ΔQ₃
mul!(ΔQ₃, Q₁, Q₁ᴴΔQ₃, -1, 1)
Expand Down
Loading