function tree=association_tree_mod(mat)


%Crea l'albero delle associazioni completo utilizzando uno dei criteri
%sviluppati
clc;
tic
%association1(mat);
tabella=association(mat);
for i=1:size(tabella,2)
    livello{1,i}=tabella{3,i};
    tree{1,1}=livello;
end

tabella_lev=levels_association(mat,tabella);
c=2;

while size(tabella_lev,2)>=2
    clear livello;
    for i=1:size(tabella_lev,2)
        livello{1,i}=tabella_lev{3,i};
        livello{2,i}=tabella_lev{1,i};
    end
    tree{c,1}=livello;
    tabella_lev=levels_association(mat,tabella_lev);
    c=c+1;
end

%Visualizzaziome rapida, commentabile per velocizzare l'algoritmo
for i=1:size(tree,1)
    disp(['livello ',num2str(i)]);
    disp([' ']);
    for j=1:size(tree{i},2)
        disp([mat2str(tree{i}{1,j})]);
    end
    disp([' ']);
end
toc