0001 function pl = plist(varargin)
0002
0003
0004
0005
0006
0007
0008
0009
0010
0011
0012
0013
0014 ALGONAME = mfilename;
0015 VERSION = '$Id: plist.html,v 1.1 2007/06/08 14:15:06 hewitson Exp $';
0016
0017 if nargin == 0
0018 pl.params = [];
0019 pl.version = VERSION;
0020 pl = class(pl, 'plist');
0021 elseif nargin == 1
0022 if isstruct(varargin{1})
0023 plstruct = varargin{1};
0024 pi = plstruct.params;
0025 params = [];
0026 for j=1:length(pi)
0027 if isstruct(pi(j))
0028 params = [params param(pi(j))];
0029 else
0030 params = [params pi(j)];
0031 end
0032 end
0033 pl.params = params;
0034 pl.version = plstruct.version;
0035 pl = class(pl, 'plist');
0036 else
0037 pl.params = varargin{1};
0038 pl.version = VERSION;
0039 pl = class(pl, 'plist');
0040 end
0041 else
0042 error('### Unknown number of constructor arguments.');
0043 end
0044
0045
0046
0047
0048