11# AdjointTensorMap
22# ----------------
33# 1-arg functions
4- function initialize_output (:: typeof (left_null!), t:: AdjointTensorMap ,
5- alg:: AbstractAlgorithm )
6- return adjoint (initialize_output (right_null!, adjoint (t), alg))
4+ function initialize_output (:: typeof (left_null!), t:: AdjointTensorMap )
5+ return adjoint (initialize_output (right_null!, adjoint (t)))
76end
8- function initialize_output (:: typeof (right_null!), t:: AdjointTensorMap ,
9- alg:: AbstractAlgorithm )
10- return adjoint (initialize_output (left_null!, adjoint (t), alg))
7+ function initialize_output (:: typeof (right_null!), t:: AdjointTensorMap )
8+ return adjoint (initialize_output (left_null!, adjoint (t)))
119end
1210
13- function left_null! (t:: AdjointTensorMap , N:: AdjointTensorMap , alg :: AbstractAlgorithm )
14- right_null! (adjoint (t), adjoint (N), alg )
11+ function left_null! (t:: AdjointTensorMap , N:: AdjointTensorMap )
12+ right_null! (adjoint (t), adjoint (N))
1513 return N
1614end
17- function right_null! (t:: AdjointTensorMap , N:: AdjointTensorMap , alg :: AbstractAlgorithm )
18- left_null! (adjoint (t), adjoint (N), alg )
15+ function right_null! (t:: AdjointTensorMap , N:: AdjointTensorMap )
16+ left_null! (adjoint (t), adjoint (N))
1917 return N
2018end
2119
@@ -27,8 +25,9 @@ function MatrixAlgebraKit.is_right_isometry(t::AdjointTensorMap; kwargs...)
2725end
2826
2927# 2-arg functions
30- for (left_f!, right_f!) in zip ((:qr_full! , :qr_compact! , :left_polar! , :left_orth! ),
31- (:lq_full! , :lq_compact! , :right_polar! , :right_orth! ))
28+ for (left_f!, right_f!) in
29+ zip ((:qr_null! , :qr_full! , :qr_compact! , :left_polar! , :left_orth! ),
30+ (:lq_null! , :lq_full! , :lq_compact! , :right_polar! , :right_orth! ))
3231 @eval function initialize_output (:: typeof ($ left_f!), t:: AdjointTensorMap ,
3332 alg:: AbstractAlgorithm )
3433 return reverse (adjoint .(initialize_output ($ right_f!, adjoint (t), alg)))
0 commit comments