Update svd.m

Author: bchaoss

svd.m

@@ -42,18 +42,15 @@
     if p < tol
         q = q + 1;
         V{q} = Q_0' * d;
-        fprintf("here")
     else
         if q > 0
-            fprintf("there.")
             k = size(S,1);
             Y = [S, cell2mat(V)]; 
             [Qy, Sy, Ry] = svd(Y, 'econ');
             Q = Q*(Q_0*Qy); S = Sy;
             R1 = Ry(1:k,:); R2 = Ry(k+1:end,:); 
             R = [R*R1; R2];
             d = Qy' * d;
-            %clear Y Qy Sy Ry
         end
         V = {}; q = 0;