function ltpdv_hist_plot(varargin)

% Handles
myh     = varargin{1};
mainfig = varargin{end};

% Get selected objects
objs = ltpdv_get_selected_objs(mainfig);

% Pass AOs to iplot
for j=1:length(objs)
   obj = objs{j};
   if isa(obj, 'ao')
     plot(obj.hist);
   else
      warning('!!! Skipping object %s - it''s not an AO.', obj.name);
   end
end