Fix trunc arg whoops

Author: Katharine Hyatt

src/implementations/svd.jl

@@ -399,7 +399,7 @@ function svd_trunc_no_error!(A::AbstractMatrix, USVᴴ, alg::TruncatedAlgorithm{
 
     do_gauge_fix = get(alg.alg.kwargs, :fixgauge, default_fixgauge())::Bool
     # the output matrices here are the same size as for svd_full!
-    do_gauge_fix && gaugefix!(svd_full!, Utr, Vᴴtr)
+    do_gauge_fix && gaugefix!(svd_trunc!, Utr, Vᴴtr)
 
     return Utr, Str, Vᴴtr
 end

test/svd.jl

@@ -27,7 +27,7 @@ for T in (BLASFloats..., GenericFloats...), m in (0, 54), n in (0, 37, m, 63)
             TestSuite.test_svd_algs(CuMatrix{T}, (m, n), CUDA_SVD_ALGS)
             k = 5
             p = min(m, n) - k - 2
-            min(m, n) > k + 2 && TestSuite.test_randomized_svd(CuMatrix{T}, (m, n), (CUSOLVER_Randomized(; k, p, niters = 20),))
+            min(m, n) > k + 2 && TestSuite.test_randomized_svd(CuMatrix{T}, (m, n), (TruncatedAlgorithm(CUSOLVER_Randomized(; k, p, niters = 20), truncrank(k)),))
             if n == m
                 TestSuite.test_svd(Diagonal{T, CuVector{T}}, m)
                 TestSuite.test_svd_algs(Diagonal{T, CuVector{T}}, m, (DiagonalAlgorithm(),))