function display(q,ki,kj)
%QUEUE\DISPLAY 	command window display of a queue object.
% 調用格式
%	display(q)			籠統顯示整個隊列
%	display(q,ki)		單下標法顯示具體隊列元素的內容
%	display(q,ki,kj)	雙下標法顯示具體隊列元素的內容
if nargin==0;error('缺少輸入宗量，即被顯示對象 ！');end
switch nargin
case 1						% 顯示整個隊列
   [m,n]=size(q);
	vname=inputname(1);					% 被顯示對象 q 的名稱
	if isempty(vname)					% 顯示對象若無名稱
	   fprintf('ans=\n');				% 按MATLAB慣例，屏幕顯示ans缺省名
	elseif fprintf('%s=\n',vname);		% 對象有名稱時，則屏幕以字符串形式顯示名稱
	end;
	if isempty(q)							% 假如被顯示對象為"空"
      fprintf('   [ empty  ')													%<17>
      fprintf('%s',class(q))													%<18>
      fprintf(' ]\n\n');														%<19>
	elseif m*n==1;						% 被顯示對象今包含一個"元素"時
	   fprintf('   %s: ',q.name);		% 屏幕先以字符串形式顯示所存放對象的名稱
	   disp(q.value);					% 緊接著，不換行，顯示所存放對象的內容
	   fprintf('\n');
	else 									% 被顯示對象今包含多個"元素"時
      fprintf('   [ %d*%d ',m,n)		% 以下3條指令只顯示隊列"元素"排列<25>
      fprintf('%s',class(q))													%<26>
      fprintf(' ]\n\n');														%<27>
	end
case 2						% 單下標法顯示具體隊列元素的內容
   disp(['The content of ',inputname(1),'(',int2str(ki),')'])
   disp(['is a ''',class(q(ki).value),''' object'])
   fprintf('  %s=\n',q(ki).name);
   disp(q(ki).value);
   fprintf('\n');
case 3						% 雙下標法顯示具體隊列元素的內容
   disp(['The content of ',inputname(1),'(',int2str(ki),',',int2str(kj),')'])
   disp(['is a ''',class(q(ki,kj).value),''' object'])
   fprintf('   %s=\n',q(ki,kj).name);
   disp(q(ki,kj).value);
   fprintf('\n');
end