function H=Entropija(P)
%Entropija  Racuna entropiju izvora.
%   Entropija(P) racuna entropiju izvora, gde parametar P predstavlja
%   vektor verovatnoca pojavljivanja poruka datog izvora. Broj razlicitih 
%   poruka koje emituje izvor odredjen je duzinom vektora P. Ako je P nije
%   regularan vektor verovatnoca poruka (suma verovatnoca razlicita od jedinice
%   ili ma koja verovatnoca jednaka nuli) rezultat izvrsavanja funkcije je H=0.

H=0;

%povratak iz funkcije jer P nije vektor verovatnoca
if sum(P)+eps < 1
    return      
end

%povratak iz funkcije ako je ma koja verovatnoca jednaka 0 jer ne moze da
%se izracuna log(x)
for i=1:length(P)
    if P(i)==0
        return  
    end
end

H=-sum(P.*log2(P)); %racuna entropiju