0001 function display(p)
0002
0003
0004
0005
0006
0007
0008
0009
0010 for i=1:length(p)
0011 banner = sprintf('---- param %d ----', i);
0012 disp(banner);
0013
0014
0015 name = get(p(i), 'key');
0016 v = get(p(i), 'val');
0017
0018
0019 if ischar(v)
0020 sval = v;
0021 elseif isnumeric(v)
0022 sval = '';
0023 for j=1:min(length(v), 10)
0024 sval = [sval sprintf('%g ', v(j))];
0025 end
0026 if length(v) > 10
0027 sval = [sval '...'];
0028 end
0029 elseif isa(v, 'specwin');
0030 sval = char(v);
0031 elseif isa(v, 'miir');
0032 sval = char(v);
0033 elseif isa(v, 'mfir');
0034 sval = char(v);
0035
0036
0037
0038
0039 elseif isstruct(v)
0040 sval = v.name;
0041 elseif isa(v, 'ao') || isa(v, 'fsdata') || isa(v, 'tsdata') || isa(v, 'cdata')
0042 vinfo = whos('v');
0043 sval = vinfo.class;
0044 elseif isa(v, 'pole') || isa(v, 'zero') || isa(v, 'pzmodel')
0045 sval = '';
0046 for j=1:length(v)
0047 sval = [sval ' ' char(v(j))];
0048 end
0049 else
0050 error('### parameter has unknown type')
0051 end
0052
0053
0054 disp(sprintf('key: %s\nval: %s', name, deblank(sval)))
0055
0056 bannerEnd = [];
0057 while length(bannerEnd) < length(banner)
0058 bannerEnd = [bannerEnd '-'];
0059 end
0060 disp(bannerEnd);
0061
0062 end
0063
0064
0065