function [U_redim]=insert_yzero_U(U,i)

%inserisce l'i-esima colonna
%function [U_redim]=insert_yzero_U(U,i)
[r c]=size(U);

% switch i
%     case i<0, 
%             U_redim=[ zeros(r,1) U ];        
%     case i==1,
%             U_redim=[ zeros(r,1) U ];
%     case ( i>1 && i<=c ),  %vorrei capire per quale casino non funziona
%             U_redim=[  U(:,1:i-1)  zeros(r,1) U(:,i:end) ];  
% %     case i==c,
% %             U_redim=[  U(:,1:c-1)  zeros(r,1) U(:,c) ];  
%     case i>c,
%             U_redim=[  U  zeros(r,1) ];    
%     otherwise,
%         U_redim=[  U(:,1:i-1)  zeros(r,1) U(:,i:end) ];          
% end


if i<0
    U_redim=[ zeros(r,1) U ];        
elseif i==1
    U_redim=[ zeros(r,1) U ];
elseif ( i>1 && i<=c ),  
    U_redim=[  U(:,1:i-1)  zeros(r,1) U(:,i:end) ];  
elseif i>c
    U_redim=[  U  zeros(r,1) ];            
end

