diff m-toolbox/test/test_pzm_to_fir.m @ 0:f0afece42f48

Import.
author Daniele Nicolodi <nicolodi@science.unitn.it>
date Wed, 23 Nov 2011 19:22:13 +0100
parents
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/m-toolbox/test/test_pzm_to_fir.m	Wed Nov 23 19:22:13 2011 +0100
@@ -0,0 +1,23 @@
+% TEST_PZM_TO_FIR tests converting pzmodel into an FIR filter
+%
+% M Hewitson 16-08-07
+%
+% $Id: test_pzm_to_fir.m,v 1.3 2009/02/02 15:20:38 hewitson Exp $
+%
+function test_pzm_to_fir()
+  
+  
+  ps = [pz(1) pz(200)];
+  zs = [pz(50)];
+  
+  % Make pz model
+  pzm = pzmodel(1, ps, zs);
+  
+  % Make filter
+  f = mfir(plist('pzmodel', pzm));
+  
+  % compute response
+  resp(f)
+  
+end
+% END
\ No newline at end of file