% DISPLAY implement terminal display for fsdata object.
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
% DESCRIPTION: DISPLAY implement terminal display for fsdata object.
%
% VERSION:     $Id: display.m,v 1.20 2011/02/18 16:48:52 ingo Exp $
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

function varargout = display(varargin)

  fsdatas = [varargin{:}];

  txt = {};

  for i=1:numel(fsdatas)    

    banner_start = sprintf('----------- fsdata %02d -----------', i);
    txt{end+1} = banner_start;
    txt{end+1} = ' ';

    txt{end+1} = sprintf('    fs:  %g', fsdatas(i).fs);
    txt{end+1} = sprintf('     x:  [%d %d], %s', size(fsdatas(i).x), class(fsdatas(i).x));
    txt{end+1} = sprintf('     y:  [%d %d], %s', size(fsdatas(i).y), class(fsdatas(i).y));
    txt{end+1} = sprintf('    dx:  [%d %d], %s', size(fsdatas(i).dx), class(fsdatas(i).dx));
    txt{end+1} = sprintf('    dy:  [%d %d], %s', size(fsdatas(i).dy), class(fsdatas(i).dy));
    txt{end+1} = sprintf('xunits:  %s', char(fsdatas(i).xunits));
    txt{end+1} = sprintf('yunits:  %s', char(fsdatas(i).yunits));
    txt{end+1} = sprintf('    t0:  %s', char(fsdatas(i).t0));
    txt{end+1} = sprintf('  navs:  %g', fsdatas(i).navs);

    banner_end(1:length(banner_start)) = '-';
    txt{end+1} = banner_end;

    txt{end+1} = ' ';
  end

  %%% Prepare output
  if nargout == 0
    for ii=1:length(txt)
      disp(txt{ii});
    end
  elseif nargout == 1
    varargout{1} = txt;
  end
    
end