Mercurial > hg > ltpda

diff m-toolbox/test/test_ao_delay.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
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/m-toolbox/test/test_ao_delay.m	Wed Nov 23 19:22:13 2011 +0100
@@ -0,0 +1,25 @@
+function test_ao_delay
+
+% Test function for the ao/delay method
+% 
+% M Hewitson 08-04-08
+% 
+% $Id: test_ao_delay.m,v 1.1 2008/04/08 09:27:01 hewitson Exp $
+% 
+
+clear all;
+
+a = ao(plist('waveform', 'noise', 'fs', 100, 'nsecs', 1000, 'f', .1));
+
+b = delay(a, plist('N', 30));
+
+iplot(a,b, plist('Markers', {'x', 'o'}))
+
+spl = plist('split_type', 'times', 'times', [0 900]);
+
+c = ltpda_tfe(split(b, spl), split(a, spl), plist('Nfft', 1000, 'win', specwin('BH92', 10)));
+
+
+iplot(c(1,2));
+
+