function [ L postoji_L ] = racunamo_L (indeks)
% racunamo_L
% L -> svi descendanti (potomci) osim offspringa (djece)
% Ulaz: indeks - vektor (i,j) koeficijenta matrice
% Izlazi: L - vrijednosti potomaka koji nisu djeca
%         postoj_L - zastavica koja oznaèava da li koeficijent ima L


global wav_matrica

L=[];
postoji_L=1;

[O ind_offsp, postoji_offsp] = racunamo_offspringe (indeks);

ind = ind_offsp; % u pozivajuæu fju vracamo samo indeks offspringa
%prve offspringe ne uracunavamo u L !

[sizey sizex]= size (wav_matrica);

%postoji_offsp
if postoji_offsp==0
    postoji_L=0;
end

size_ind_offsp1=size (ind_offsp,1);
prvi_ulaz=1;
ind_offsp_pom=[];
ind_offsp_pom2=[];
while postoji_offsp==1
    
    if prvi_ulaz==1
        ind_offsp_pom=ind_offsp;
    else
        ind_offsp_pom=[];
        break;
    end
    prvi_ulaz=0;
    for m=1:size_ind_offsp1

        if not(ind_offsp_pom(m,1)==0 & ind_offsp_pom(m,2)==0)
            [O ind_offsp_x postoji_offsp_x] = racunamo_offspringe (ind_offsp (m,:));
            if postoji_offsp_x==1
                L=[L,O];
                ind_offsp_pom2= [ind_offsp_pom2;ind_offsp_x];
            else
                postoji_L=0;
            end

        end
        
    end
    ind_offsp_pom=ind_offsp_pom2;
    size_ind_offsp1=size (ind_offsp_pom,1);
    if size_ind_offsp1==0
        break;
    end

end


