function [ moy ] = moyhisto( nb, gl, glmin, glmax )
%UNTITLED2 calcule la moyenne des gl entre les seuils glmin et glmax
%   
somme = 0 ;
sommeC= 0 ;
for i=glmin:glmax
    k=find(gl==i);
    somme=somme+nb(k)*i ;
    sommeC = sommeC+nb(k) ;
end
moy = somme/sommeC ;
