Correctly implement isisometry

Author: lkdvos

src/tensors/factorizations/factorizations.jl

@@ -36,7 +36,7 @@ import MatrixAlgebraKit: select_algorithm,
                          left_null_svd!, right_null_svd!,
                          left_orth!, right_orth!, left_null!, right_null!,
                          truncate!, findtruncated, findtruncated_sorted,
-                         diagview, isisometry
+                         diagview
 
 include("utility.jl")
 include("interface.jl")
@@ -174,9 +174,15 @@ function LinearAlgebra.isposdef!(t::TensorMap)
 end
 
 # TODO: tolerances are per-block, not global or weighted - does that matter?
-function isisometry(t::AbstractTensorMap; kwargs...)
+function MatrixAlgebraKit.is_left_isometry(t::AbstractTensorMap; kwargs...)
     domain(t) ≾ codomain(t) || return false
-    return all(x -> isisometry(x[2]; kwargs...), blocks(t))
+    f((c, b)) = MatrixAlgebraKit.is_left_isometry(b; kwargs...)
+    return all(f, blocks(t))
+end
+function MatrixAlgebraKit.is_right_isometry(t::AbstractTensorMap; kwargs...)
+    domain(t) ≿ codomain(t) || return false
+    f((c, b)) = MatrixAlgebraKit.is_right_isometry(b; kwargs...)
+    return all(f, blocks(t))
 end
 
 end