Mercurial > hg > ltpda

diff m-toolbox/test/tmp/test_ao_attachm.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/tmp/test_ao_attachm.m	Wed Nov 23 19:22:13 2011 +0100
@@ -0,0 +1,32 @@
+	
+function a_out = test_ao_attachm	
+	
+% Test script for ao/attachm	
+% 	
+% M Hewitson 23-02-08	
+% 	
+% $Id: test_ao_attachm.m,v 1.1 2008/03/02 18:47:55 hewitson Exp $	
+% 	
+	
+	
+a1 = ao(plist('tsfcn', 'sin(2*pi*0.1*t)', 'nsecs', 100, 'fs', 10));	
+	
+a1 = attachm(a1, mfilename);	
+	
+a1.mfile	
+	
+save(a1, 'a1.xml')	
+	
+clear all	
+	
+a1 = ao('a1.xml');	
+	
+mkdir tmp	
+cd tmp	
+	
+	
+extractm(a1)	
+	
+edit test_ao_attachm	
+	
+