function test_plist_combine()

% Test the combine function of plist class.
% 
% M Hewitson 28-04-07
% 
% $Id: test_plist_combine.m,v 1.1 2007/04/28 07:50:46 hewitson Exp $
% 

% Make some parameters

p1 = param('a', 1);
p2 = param('b', 2);
p3 = param('c', 3);
p4 = param('a', 4);

% make plists
pl1 = plist([p1 p2]);
pl2 = plist(p3);
pl3 = plist([p2 p4]);

% combine
pl = combine(pl1, pl2, pl3)

% END