% Quelques parametres a garder en memoire

function [x, y, IX] = param(R, l, c)

df = @trace_ed;
dim_image = (l-1)*(c-1);
R2 = R(:);
[R3,IX] = sort(R2);

x = zeros([dim_image 1]);
k = 1:dim_image;
x(k) = k;

y = R3(dim_image-(x-1));
%xd = x(1:length(x)-1);