function reseni_ukol2b(P,k,fi,p)
% function reseni_ukol2b(P,k,fi,p)
%
% Funkce transformuje zadany objekt  % 
% P  ... matice souradnic bodu
% k  ... koeficient stejnolehlosti
% fi ... uhel otoceni
% p  ... vektor posunuti


%vytvoreni okna pro vykresleni
shg
clf reset
hold on

% zjisteni poctu zadanych bodu
poc = size(P,2);

% prealokace vysledne matice
Pt = zeros(2,poc);


% vykresleni vzoru
fill(P(1,:),P(2,:),'red');
axis equal
grid on


% aplikace transformaci
i = 1;
while i <= poc
    Pt(:,i) = reseni_ukol2a(P(:,i),k,fi,p);
    i = i + 1;    
end

% vykresleni vysledku
fill(Pt(1,:),Pt(2,:),'blue');


end

% konec



