function P_transf = posunuti(P,pos)
% P_transf = posunuti(P,pos)
%
% zobrazi mnozinu bodu zadanych v matici P v posunuti s vektorem posunuti pos, 
% obrazy bodu zapise do matice P_transf
%
% input:
% P ... vzory posunuti (souradnice bodu jsou zapsany do sloupcu P)
% pos ... vektor posunuti
%
% output:
% P_transf ... obrazy posunuti (souradnice bodu jsou zapsany do
% sloupcu P_transf)

if size(pos,1) ~= size(P,1)
    pos = pos';
end

for i=1:size(P,2)
    P_transf(:,i)=P(:,i)+pos;
end

disp(['Vzory posunuti: '])
P
disp(['Obrazy posunuti: '])
P_transf

% konec

