function [ out ] = Cutter( in, l, c )
% 
%     %Décomposition en régions
%     l=5; % Nb paralleles
%     c=8; % Nb méridiens

    disp(['  Décomposition en ' num2str(l) '*' num2str(c) ' régions']);
    
    T=in(:,:,:)~=0;
    m=T(:,:,1)+T(:,:,2)+T(:,:,3);
    [u, v]=size(m);
    
    out=zeros(u,v);

    for i=1:u
        out(i,:)=decompLine(m(i,:),ceil(i/(u/c)),l);
    end
end