function Reseni_ukolu_11_3
% RL derivaèní èlen (horní propus� - odfiltruje nižší kmitoèty), 
% dáno R[Ohm], L[mH].
% fázová frekvenèní charakteristika - závislost úhlu (fáze) pøenosu Ku na frekvenci w
w=logspace(1,5,100); % vytvoøení øady s logaritmickým dìlením
                     % logspace(poèátek,konec,poèet bodù na ose)
                     % w je z intervalu od 10^1 do 10^5, tj. od 10 
                     % do 100 000 rozdìleného na 100 bodù
R = 5; % R [Ohm]
L = 2e-2; % L [H], 20 mH = 0.02 H
Ku = (j*w*L)./(R+(j*w*L)); % výpoèet napì�ového pøenosu Ku

fi = angle(Ku)*180/pi; % výpoèet úhlu komplexního èísla podle vzorce: arctg(Im(Ku)/Re(Ku))
                         % úhel pøeveden na stupnì

semilogx(w,fi); % graf v semilogaritmických souøadnicích s osou x s logaritmickým dìlením
                     % fázová frekvenèní charakteristika - závislost úhlu
                     % (fáze) pøenosu Ku na frekvenci w
grid                      % møížka v grafu
title('Fazova frekvencni charakteristika')
xlabel('\omega [rad/s]'); % popis osy x
                          % \omega - øecké písmeno omega
ylabel('\phi [\circ]'); % popis osy y
                        % \phi - øecké písmeno fi
                        % \circ - znak pro stupeò (koleèko)