function [] = BDD(folder)

    d=dir(folder);

    [lg, r]=size(d);
    for i=3:lg
        if d(i).isdir==1
            adresse=[folder '/' d(i).name];
            disp(adresse);
            Reader(adresse);
            Segmentation(adresse, 8, 5);
        end
    end

end