% Prechodne deje realizovane na transformatoru a vedeni

% Vypocet chodu nakratko
TauK=Ls/Rk
Ikm=Um*Ukp/100/Zk
PsiK=atan(Xs/Rk)

% Integracni konstanta
Ck=Ikm*sin(PsiK)

t=0:0.0001:0.1;
Ikt=Ck*exp(-t/TauK) + Ikm*sin(omega*t-PsiK);
plot(t,Ikt);
grid on;

% Kontrola pres komplexni vyjadreni Ik
Ikc=Un1*Ukp/100/sqrt(3)/(Rk+i*Xs)
% Amplituda alternativne
Ikm2=sqrt(2)*abs(Ikc)
% Faze alternativne 
PsiK2=angle(Ikc)

% Kontrola pres jmenovity proud
Ikm3=Int*sqrt(2)
