function display(opaque_array)
%DISPLAY Display an OPAQUE object.

%   Chip Nylander, May 1998
%   Copyright 1984-2000 The MathWorks, Inc. 
%   $Revision: 1.8 $  $Date: 2000/06/16 19:05:11 $

if ~isjava(opaque_array)
    opaque_array_name = evalin('caller','inputname(1);','[]');
    if ~isempty(opaque_array_name),
      eval([opaque_array_name '= opaque_array;']);
    else,
      opaque_array_name = 'ans';
      ans = opaque_array;
    end;
    builtin('display',eval(opaque_array_name));
    return;
end;

if strcmp(get(0, 'FormatSpacing'), 'loose')
    loose = 1;
else
    loose = 0;
end;

%
% Name or ans
%
if loose ~= 0
    disp(' ');
end;

if isempty(inputname(1))
    disp('ans =');
else
    disp([inputname(1) ' =']);
end;

if loose ~= 0
    disp(' ');
end;

disp(opaque_array);

if loose ~= 0
    disp(' ');
end;





