--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/m-toolbox/test/make_ltpda_objects.m	Wed Nov 23 19:22:13 2011 +0100
@@ -0,0 +1,51 @@
+% make some test objects
+
+
+
+fs  = 10;
+
+pl1 = plist();
+pl1 = append(pl1, param('fs', fs));
+pl1 = append(pl1, param('nsecs', 1));
+pl1 = append(pl1, param('waveform', 'sine wave'));
+pl1 = append(pl1, param('f', 1.23));
+pl1 = append(pl1, param('phi', 30));
+
+% tsdata
+a1 = ao(pl1);
+
+% fsdata
+f  = 1:10;
+xx = randn(size(f));
+a2 = ao(fsdata(f,xx,fs));
+
+% xydata
+x = 1:10;
+y = exp(x.^.5/2);
+
+a3 = ao(xydata(x,y));
+
+% cdata
+a4 = ao([1 -2 3; 4  5 -6; -7 8  9]);
+
+a5 = ao(plist('tsfcn', 'randn(size(t))', 'nsecs', 1, 'fs', fs));
+a6 = ao(plist('tsfcn', 'randn(size(t))', 'nsecs', 1, 'fs', fs));
+
+
+% specwin
+s = specwin('Hanning', 100);
+
+% pzmodel
+pzm = pzmodel(1, pz(1), pz(10));
+
+% mfir
+firf = mfir(plist('type', 'highpass', 'gain', 2, 'fs', 100, 'fc', 1));
+
+% miir
+iirf = miir(plist('type', 'highpass', 'gain', 2, 'fs', 100, 'fc', 1));
+
+% time
+t = time('2007-06-06 14:00:05.000');
+
+% timespan
+ts = timespan('14:00:00.000', '14:00:05.000');