partie 1 : Compression :
Codage Huffman2 pour une image en grayscale
function [code_huffman,dico]=testhuff2_gris(file,qualite)
%Codage de l'image en HUFFMAN2 pour gris
%Découpage en blocs
decoupage (file);
load fichiers_mat/matrices;
%Application sur chaque bloc
x=1;
while x<=t/64
[code_huff,dico]=traitement_huff2_gris (eval(['G',num2str(x)]),qualite);
eval(['P' num2str(x) '=code_huff;']);
eval(['D' num2str(x) '=dico;']);
x=x+1;
end % end while
save fichiers_mat/mat_y;
%Concaténer les codes pour avoir un seul code
code_comp_code=obt_chaine (t/64,'P',1,0);
code_comp_dico=obt_chaine (t/64,'D',1,0);
load fichiers_mat/mat_y;
G=eval(['[' code_comp_code ']']);
dico=eval(['[' code_comp_dico ']']);
code_huffman=[G 'g'];
dico{2,length(dico)}=qualite;