Mercurial > hg > ltpda
view m-toolbox/classes/@miir/fromParfrac.m @ 35:4be5f7a5316f database-connection-manager
Suppress output messages on preferences loading and saving
author | Daniele Nicolodi <nicolodi@science.unitn.it> |
---|---|
date | Mon, 05 Dec 2011 16:20:06 +0100 |
parents | f0afece42f48 |
children |
line wrap: on
line source
% Construct an miir from a parfrac %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % FUNCTION: fromParfrac % % DESCRIPTION: Construct an miir from a parfrac % % CALL: f = fromParfrac(f, pli) % % PARAMETER: type: String with filter type description % pli: Parameter list object % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% function f = fromParfrac(f, pli) VERSION = '$Id: fromParfrac.m,v 1.12 2011/08/15 11:22:43 hewitson Exp $'; ii = miir.getInfo('miir', 'From Parfrac'); % Set the method version string in the minfo object ii.setMversion([VERSION '-->' ii.mversion]); % Add default values pl = applyDefaults(ii.plists, pli); % Get parameters pf = find(pl, 'parfrac'); fs = find(pl, 'fs'); if isempty(fs) % get max freq in pzmodel fs = 8*getupperFreq(pf); warning([sprintf('!!! no sample rate specified. Designing for fs=%2.2f Hz.', fs)... sprintf('\nThe filter will be redesigned later when used.')]); end % make MIIR filter pfstruct = utils.math.lp2z('INOPT', 'PF', 'RES', pf.res, 'POLES', pf.poles, ... 'DTERMS', pf.dir, 'MODE', 'DBL', 'FS', fs); for jj=1:numel(pfstruct) pl = copy(pl,1); f(jj).a = pfstruct(jj).num; f(jj).b = pfstruct(jj).den; f(jj).fs = fs; if isempty(pl.find('name')) pl.pset('name', sprintf('iir(%s_%d)', pf.name, jj)); end if isempty(pl.find('description')) pl.pset('description', pf.description); end if isempty(pl.find('iunits')) pl.pset('iunits', pf.iunits); end if isempty(pl.find('ounits')) pl.pset('ounits', pf.ounits); end % Add history f(jj).addHistory(ii, pl, [], pf.hist); end % Set object properties f.setObjectProperties(pl); end % End fromParfrac