% ALLXLABEL Set all the x-axis labels on the current figure.
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
% DESCRIPTION: ALLXLABEL Set all the x-axis labels on the current figure.
%
% CALL:        allxlabel(label)
%
% VERSION:     $Id: allxlabel.m,v 1.1 2008/08/05 17:51:32 ingo Exp $
%
% HISTORY:     17-11-2002 M Hewitson
%                 Creation.
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

function allxlabel(label)

  c = get(gcf, 'children');

  for k=1:length(c)

    t = get(c(k), 'Tag');
    if isempty(t)
      h = get(c(k), 'xlabel');
      set(h, 'string', label);
    end

  end

end

