function [a]=Erlang(m,lambda,mi)
% funkce na vypocet stacionarniho rozlozeni Erlangova procesu
% syntaxe: [a]=Erlang(m,lambda,mi)
% vstupni parametry:
% m ... nejvyssi poradove cislo v mnozine stavu
% lambda ... intenzita vzniku
% mi ... intenzita zaniku
% vystupni parametr
% a ... vektor stacionarnich pravdepodobnosti
a0=1/sum(((lambda/mi).^(0:m)).*(1./(factorial(0:m))));
a=((lambda/mi).^(1:m)).*(1./(factorial(1:m)))*a0;
a=[a0 a];
