Mercurial > hg > ltpda

diff m-toolbox/test/test_ao_freq_series.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_freq_series.m	Wed Nov 23 19:22:13 2011 +0100
@@ -0,0 +1,21 @@
+function test_ao_freq_series
+
+% Test script for frequency series AO constructor
+% 
+% M Hewitson 23-02-08
+% 
+% $Id: test_ao_freq_series.m,v 1.1 2008/02/24 21:14:43 hewitson Exp $
+% 
+
+
+%% default plist
+pl = plist('fsfcn', '1e-15.*(1e-3./f.^2 + 1e-10./f.^4)', 'nf', 100);
+
+a1 = ao(pl);
+iplot(a1, plist('Markers', 'x'))
+
+%% Specify frequency scale
+
+pl = plist('fsfcn', '1./f.^2', 'scale', 'lin', 'nf', 100);
+a1 = ao(pl);
+iplot(a1, plist('Markers', 'x'))