Mercurial > hg > ltpda

diff m-toolbox/test/test_ao_cov.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_cov.m	Wed Nov 23 19:22:13 2011 +0100
@@ -0,0 +1,27 @@
+% Test script for ao/cov
+%
+% M Hewitson 09-10-08
+%
+% $Id: test_ao_cov.m,v 1.2 2008/12/11 08:25:15 hewitson Exp $
+%
+
+function test_ao_cov
+  
+  %% Make AOs
+  
+  fs =  10;
+  nsecs = 1000;
+  pl = plist('tsfcn', 'randn(size(t))', 'fs', fs, 'nsecs', nsecs);
+  
+  a = ao(pl);
+  b = ao(pl);
+  c = ao(pl);
+  
+  %% Make cov
+  
+  cv = cov(a,b,c);
+  
+  vr = cov(a,a,a);
+  
+  
+end
\ No newline at end of file