From 4f2b39cb0769b1cfc7de0175171052f94952348f Mon Sep 17 00:00:00 2001
From: Daniel Karrasch <daniel.karrasch@posteo.de>
Date: Tue, 29 Nov 2022 22:21:24 +0100
Subject: [PATCH] Adjustment to `AdjointQ` introduction in LinearAlgebra (#91)

---
 Project.toml | 3 ++-
 src/svd.jl   | 7 ++++---
 2 files changed, 6 insertions(+), 4 deletions(-)

diff --git a/Project.toml b/Project.toml
index 6e90774..79312ad 100644
--- a/Project.toml
+++ b/Project.toml
@@ -1,6 +1,6 @@
 name = "GenericLinearAlgebra"
 uuid = "14197337-ba66-59df-a3e3-ca00e7dcff7a"
-version = "0.3.4"
+version = "0.3.5"
 
 [deps]
 LinearAlgebra = "37e2e46d-f89d-539d-b4ee-838fcccc9c8e"
@@ -9,6 +9,7 @@ Random = "9a3f8284-a2c9-5f02-9a11-845980a1fd5c"
 libblastrampoline_jll = "8e850b90-86db-534c-a0d3-1478176c7d93"
 
 [compat]
+Quaternions = "=0.6.0"
 julia = "1.6"
 
 [extras]
diff --git a/src/svd.jl b/src/svd.jl
index f17953c..119cdc5 100644
--- a/src/svd.jl
+++ b/src/svd.jl
@@ -2,6 +2,8 @@ using LinearAlgebra
 
 import LinearAlgebra: mul!, rmul!
 
+AdjointQtype = isdefined(LinearAlgebra, :AdjointQ) ? LinearAlgebra.AdjointQ : Adjoint
+
 lmul!(G::LinearAlgebra.Givens, ::Nothing) = nothing
 rmul!(::Nothing, G::LinearAlgebra.Givens) = nothing
 
@@ -347,7 +349,7 @@ function lmul!(Q::LinearAlgebra.HessenbergQ, B::AbstractVecOrMat)
     return B
 end
 
-function lmul!(adjQ::Adjoint{<:Any,<:LinearAlgebra.HessenbergQ}, B::AbstractVecOrMat)
+function lmul!(adjQ::AdjointQtype{<:Any,<:LinearAlgebra.HessenbergQ}, B::AbstractVecOrMat)
 
     Q = parent(adjQ)
     m, n = size(B, 1), size(B, 2)
@@ -398,8 +400,7 @@ function rmul!(A::AbstractMatrix, Q::LinearAlgebra.HessenbergQ)
     return A
 end
 
-function rmul!(A::AbstractMatrix, adjQ::Adjoint{<:Any,<:LinearAlgebra.HessenbergQ})
-
+function rmul!(A::AbstractMatrix, adjQ::AdjointQtype{<:Any,<:LinearAlgebra.HessenbergQ})
     m, n = size(A)
     Q = parent(adjQ)