% clear;
close all;

% load exercice_1;

% Paramètre à ajuster :
m = 100;

% Calcul de la TFCT :
[Y, valeurs_tau, valeurs_f] = TFCT(y, f_ech, n_fenetre, n_decalage, fenetre);

% Sélection des m coefficients de Fourier de plus grand module :
[valeurs_max, indices_max, taux_compression] = mp3(Y, m, length(y));
fprintf('Taux de compression : %.3f\n', taux_compression);

% Reconstitution de la TFCT à partir de indices_max et valeurs_max :
nb_colonnes = size(Y, 2);
Y_reconstitue = zeros(size(Y));

for i = 1:nb_colonnes
    indices_max_i = indices_max(:, i);
    Y_reconstitue(indices_max_i, i) = valeurs_max(:, i);
end

% Affichage de la TFCT reconstituée :
figure('units','normalized','outerposition',[0 0 1 1])
imagesc(valeurs_tau, valeurs_f, 20 * log10(abs(Y_reconstitue) + eps));
axis xy;
xlabel('Temps (s)');
ylabel('Frequence (Hz)');
title('Sonagramme de la TFCT reconstitue');
drawnow;

export_fig(gcf, "saves/" + filename + "_mp3.png", '-png', '-painters', '-m2');

% save exercice_2;