clear all;

pl = plist('type', 'bandpass', 'fs', 1000, 'fc', [50 100], 'order', 3);
f1 = miir(pl);

xmlfile = 'miir.xml';
save(f1, xmlfile);

% load
f2 = miir(xmlfile);

if f1 ~= f2
  error('### miir filters are not the same')
end

