function [limite]=divide(im,um);
%
%	Recorre las columnas y en funcion
%	del nivel de gris decide si es zona
%	de interes o no.

[xmax,ymax]=size(im);

ant=1;
limite=1;

for i=1:ymax
	nivel=mean(im(:,i));
	zi=nivel>um;
	cambio=zi~=ant;
	if cambio
		limite=[limite i-1];
	end
	ant=zi;
end

limite=[limite ymax];