comparison m-toolbox/test/test_ao_delay.m @ 0:f0afece42f48

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 function test_ao_delay
2
3 % Test function for the ao/delay method
4 %
5 % M Hewitson 08-04-08
6 %
7 % $Id: test_ao_delay.m,v 1.1 2008/04/08 09:27:01 hewitson Exp $
8 %
9
10 clear all;
11
12 a = ao(plist('waveform', 'noise', 'fs', 100, 'nsecs', 1000, 'f', .1));
13
14 b = delay(a, plist('N', 30));
15
16 iplot(a,b, plist('Markers', {'x', 'o'}))
17
18 spl = plist('split_type', 'times', 'times', [0 900]);
19
20 c = ltpda_tfe(split(b, spl), split(a, spl), plist('Nfft', 1000, 'win', specwin('BH92', 10)));
21
22
23 iplot(c(1,2));
24
25