Mercurial > hg > ltpda

comparison m-toolbox/classes/@parfrac/respCore.m @ 0:f0afece42f48

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import.
author Daniele Nicolodi <nicolodi@science.unitn.it>
date Wed, 23 Nov 2011 19:22:13 +0100
parents
children
comparison
equal deleted inserted replaced
-1:000000000000 0:f0afece42f48
1 % RESPCORE returns the complex response of one parfrac object.
2 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
3 %
4 % DESCRIPTION: RESPCORE returns the complex response of one parfrac object
5 % as a data-vector. This function should only be used by the
6 % resp method of the ltpda_tf class.
7 %
8 % CALL: r = respCore(obj, f);
9 %
10 % VERSION: $Id: respCore.m,v 1.5 2011/02/04 10:55:32 luigi Exp $
11 %
12 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
13
14 function r = respCore(varargin)
15
16 %%% Get Inputs
17 obj = varargin{1};
18 f = varargin{2}; % Row vector
19
20 %%% Compute response
21 pfparams = struct('type', 'cont', ...
22 'freq', f, ...
23 'res', obj.res, ...
24 'pol', obj.poles, ...
25 'pmul', obj.pmul, ...
26 'dterm', obj.dir);
27 pfr = utils.math.pfresp(pfparams);
28 r = reshape(pfr.resp,size(f));
29
30 end
31