display

 display - method 

 $Id$

0001 function display(obj)
0002 % display - method
0003 %
0004 % $Id$
0005 
0006 inp_str = [inputname(1) ' ='];
0007 
0008 sz = size(obj);
0009 if prod(sz)>1
0010   arr_str = num2str(sz(1));
0011   for d = 2:length(sz)
0012     arr_str = [arr_str 'x' num2str(sz(d))];
0013   end
0014   arr_str = [arr_str ' maroi array with first element:'];
0015   
0016   if isequal(get(0,'FormatSpacing'),'compact')
0017     disp(inp_str);
0018     disp(arr_str);
0019   else
0020     disp(' ')
0021     disp(inp_str);
0022     disp(' ');
0023     disp(arr_str);
0024   end
0025   inp_str = [inputname(1) '(1) ='];
0026   obj = obj(1);
0027 end
0028 
0029 X = struct(obj);
0030 bO.label = label(obj);
0031 bO.source = source(obj);
0032 bO.binarize = binarize(obj);
0033 bO.roithresh = roithresh(obj);
0034 bO.spm_hold = spm_hold(obj);
0035 
0036 n =  descrip(obj);
0037 if isempty(n), n = '(no descrip)';end
0038 src = ['[' class(obj) ' - ' n ']'];
0039 if isequal(get(0,'FormatSpacing'),'compact')
0040   disp(inp_str);
0041   disp(src);
0042   disp(bO)
0043   disp(X)
0044 else
0045   disp(' ')
0046   disp(inp_str);
0047   disp(' ');
0048   disp(src);
0049   disp(' ');
0050   disp(bO)
0051   disp(' ');
0052   disp(X)
0053 end