blob: f919316af2442e514c225bf8a65a1779705ea863 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
//tf2zpk Convert transfer function filter parameters to zero-pole-gain
//form
//Calling Syntax :
// [z,p,k] = tf2zpk(b,a)
//where
//z=zeros of the corrsponding tf
//p=poles of the corresponding tf
//k=gain of the tf
//b=vector containing the numerator coefficients of the transfer function in descending powers of s
//a=vector containing the denominator coefficients of the transfer function in descending powers of s
function [zero, pole, gain] = tf2zpk(num, den)
if argn(2)< 2 | isempty(den) then
den = 1;
end
[num, den] = eqtflength(num, den);
[zero, pole, gain] = tf2zp(num, den);
endfunction
|
