partie 1 :Compression :
Decoupage en blocs >> comp_block
function mat=comp_block (matrice)
%Compléte la matrice pour que la taille soit un multiple de 8
[n nn]=size(matrice);
if mod(n,8) ~= 0 || mod(nn,8) ~= 0
indL=8-mod(n,8);
indC=8-mod(nn,8);
X=zeros(indL,nn);
Y=zeros(indL+n,indC);
mat=[matrice;X];
mat=[mat Y];
else mat=matrice; indL=0;indC=0;
end % end if
mat(mat>255)=255; mat(mat<0)=255;
save fichiers_mat/indices;