@@ -121,14 +121,14 @@ function svd_full!(A::AbstractMatrix, USVᴴ, alg::LAPACK_SVDAlgorithm)
121121 end
122122
123123 do_gauge_fix = get (alg. kwargs, :gaugefix , default_gaugefix ()):: Bool
124- lapack_kwargs = Base. structdiff (alg. kwargs, NamedTuple{(:gaugefix ,)})
124+ alg_kwargs = Base. structdiff (alg. kwargs, NamedTuple{(:gaugefix ,)})
125125
126126 if alg isa LAPACK_QRIteration
127- isempty (lapack_kwargs ) ||
127+ isempty (alg_kwargs ) ||
128128 throw (ArgumentError (" invalid keyword arguments for LAPACK_QRIteration" ))
129129 YALAPACK. gesvd! (A, view (S, 1 : minmn, 1 ), U, Vᴴ)
130130 elseif alg isa LAPACK_DivideAndConquer
131- isempty (lapack_kwargs ) ||
131+ isempty (alg_kwargs ) ||
132132 throw (ArgumentError (" invalid keyword arguments for LAPACK_DivideAndConquer" ))
133133 YALAPACK. gesdd! (A, view (S, 1 : minmn, 1 ), U, Vᴴ)
134134 elseif alg isa LAPACK_Bisection
@@ -154,20 +154,20 @@ function svd_compact!(A::AbstractMatrix, USVᴴ, alg::LAPACK_SVDAlgorithm)
154154 U, S, Vᴴ = USVᴴ
155155
156156 do_gauge_fix = get (alg. kwargs, :gaugefix , default_gaugefix ()):: Bool
157- lapack_kwargs = Base. structdiff (alg. kwargs, NamedTuple{(:gaugefix ,)})
157+ alg_kwargs = Base. structdiff (alg. kwargs, NamedTuple{(:gaugefix ,)})
158158
159159 if alg isa LAPACK_QRIteration
160- isempty (lapack_kwargs ) ||
160+ isempty (alg_kwargs ) ||
161161 throw (ArgumentError (" invalid keyword arguments for LAPACK_QRIteration" ))
162162 YALAPACK. gesvd! (A, S. diag, U, Vᴴ)
163163 elseif alg isa LAPACK_DivideAndConquer
164- isempty (lapack_kwargs ) ||
164+ isempty (alg_kwargs ) ||
165165 throw (ArgumentError (" invalid keyword arguments for LAPACK_DivideAndConquer" ))
166166 YALAPACK. gesdd! (A, S. diag, U, Vᴴ)
167167 elseif alg isa LAPACK_Bisection
168- YALAPACK. gesvdx! (A, S. diag, U, Vᴴ; lapack_kwargs ... )
168+ YALAPACK. gesvdx! (A, S. diag, U, Vᴴ; alg_kwargs ... )
169169 elseif alg isa LAPACK_Jacobi
170- isempty (lapack_kwargs ) ||
170+ isempty (alg_kwargs ) ||
171171 throw (ArgumentError (" invalid keyword arguments for LAPACK_Jacobi" ))
172172 YALAPACK. gesvj! (A, S. diag, U, Vᴴ)
173173 else
@@ -183,20 +183,20 @@ function svd_vals!(A::AbstractMatrix, S, alg::LAPACK_SVDAlgorithm)
183183 check_input (svd_vals!, A, S, alg)
184184 U, Vᴴ = similar (A, (0 , 0 )), similar (A, (0 , 0 ))
185185
186- lapack_kwargs = Base. structdiff (alg. kwargs, NamedTuple{(:gaugefix ,)})
186+ alg_kwargs = Base. structdiff (alg. kwargs, NamedTuple{(:gaugefix ,)})
187187
188188 if alg isa LAPACK_QRIteration
189- isempty (lapack_kwargs ) ||
189+ isempty (alg_kwargs ) ||
190190 throw (ArgumentError (" invalid keyword arguments for LAPACK_QRIteration" ))
191191 YALAPACK. gesvd! (A, S, U, Vᴴ)
192192 elseif alg isa LAPACK_DivideAndConquer
193- isempty (lapack_kwargs ) ||
193+ isempty (alg_kwargs ) ||
194194 throw (ArgumentError (" invalid keyword arguments for LAPACK_DivideAndConquer" ))
195195 YALAPACK. gesdd! (A, S, U, Vᴴ)
196196 elseif alg isa LAPACK_Bisection
197- YALAPACK. gesvdx! (A, S, U, Vᴴ; lapack_kwargs ... )
197+ YALAPACK. gesvdx! (A, S, U, Vᴴ; alg_kwargs ... )
198198 elseif alg isa LAPACK_Jacobi
199- isempty (lapack_kwargs ) ||
199+ isempty (alg_kwargs ) ||
200200 throw (ArgumentError (" invalid keyword arguments for LAPACK_Jacobi" ))
201201 YALAPACK. gesvj! (A, S, U, Vᴴ)
202202 else
@@ -337,15 +337,15 @@ function svd_full!(A::AbstractMatrix, USVᴴ, alg::GPU_SVDAlgorithm)
337337 end
338338
339339 do_gauge_fix = get (alg. kwargs, :gaugefix , default_gaugefix ()):: Bool
340- lapack_kwargs = Base. structdiff (alg. kwargs, NamedTuple{(:gaugefix ,)})
340+ alg_kwargs = Base. structdiff (alg. kwargs, NamedTuple{(:gaugefix ,)})
341341
342342 if alg isa GPU_QRIteration
343- isempty (lapack_kwargs ) || @warn " invalid keyword arguments for GPU_QRIteration"
343+ isempty (alg_kwargs ) || @warn " invalid keyword arguments for GPU_QRIteration"
344344 _gpu_gesvd_maybe_transpose! (A, view (S, 1 : minmn, 1 ), U, Vᴴ)
345345 elseif alg isa GPU_SVDPolar
346- _gpu_Xgesvdp! (A, view (S, 1 : minmn, 1 ), U, Vᴴ; lapack_kwargs ... )
346+ _gpu_Xgesvdp! (A, view (S, 1 : minmn, 1 ), U, Vᴴ; alg_kwargs ... )
347347 elseif alg isa GPU_Jacobi
348- _gpu_gesvdj! (A, view (S, 1 : minmn, 1 ), U, Vᴴ; lapack_kwargs ... )
348+ _gpu_gesvdj! (A, view (S, 1 : minmn, 1 ), U, Vᴴ; alg_kwargs ... )
349349 else
350350 throw (ArgumentError (" Unsupported SVD algorithm" ))
351351 end
@@ -379,15 +379,15 @@ function svd_compact!(A::AbstractMatrix, USVᴴ, alg::GPU_SVDAlgorithm)
379379 U, S, Vᴴ = USVᴴ
380380
381381 do_gauge_fix = get (alg. kwargs, :gaugefix , default_gaugefix ()):: Bool
382- lapack_kwargs = Base. structdiff (alg. kwargs, NamedTuple{(:gaugefix ,)})
382+ alg_kwargs = Base. structdiff (alg. kwargs, NamedTuple{(:gaugefix ,)})
383383
384384 if alg isa GPU_QRIteration
385- isempty (lapack_kwargs ) || @warn " invalid keyword arguments for GPU_QRIteration"
385+ isempty (alg_kwargs ) || @warn " invalid keyword arguments for GPU_QRIteration"
386386 _gpu_gesvd_maybe_transpose! (A, S. diag, U, Vᴴ)
387387 elseif alg isa GPU_SVDPolar
388- _gpu_Xgesvdp! (A, S. diag, U, Vᴴ; lapack_kwargs ... )
388+ _gpu_Xgesvdp! (A, S. diag, U, Vᴴ; alg_kwargs ... )
389389 elseif alg isa GPU_Jacobi
390- _gpu_gesvdj! (A, S. diag, U, Vᴴ; lapack_kwargs ... )
390+ _gpu_gesvdj! (A, S. diag, U, Vᴴ; alg_kwargs ... )
391391 else
392392 throw (ArgumentError (" Unsupported SVD algorithm" ))
393393 end
@@ -403,15 +403,15 @@ function svd_vals!(A::AbstractMatrix, S, alg::GPU_SVDAlgorithm)
403403 check_input (svd_vals!, A, S, alg)
404404 U, Vᴴ = similar (A, (0 , 0 )), similar (A, (0 , 0 ))
405405
406- lapack_kwargs = Base. structdiff (alg. kwargs, NamedTuple{(:gaugefix ,)})
406+ alg_kwargs = Base. structdiff (alg. kwargs, NamedTuple{(:gaugefix ,)})
407407
408408 if alg isa GPU_QRIteration
409- isempty (lapack_kwargs ) || @warn " invalid keyword arguments for GPU_QRIteration"
409+ isempty (alg_kwargs ) || @warn " invalid keyword arguments for GPU_QRIteration"
410410 _gpu_gesvd_maybe_transpose! (A, S, U, Vᴴ)
411411 elseif alg isa GPU_SVDPolar
412- _gpu_Xgesvdp! (A, S, U, Vᴴ; lapack_kwargs ... )
412+ _gpu_Xgesvdp! (A, S, U, Vᴴ; alg_kwargs ... )
413413 elseif alg isa GPU_Jacobi
414- _gpu_gesvdj! (A, S, U, Vᴴ; lapack_kwargs ... )
414+ _gpu_gesvdj! (A, S, U, Vᴴ; alg_kwargs ... )
415415 else
416416 throw (ArgumentError (" Unsupported SVD algorithm" ))
417417 end
0 commit comments