Mercurial > hg > ltpda

diff m-toolbox/classes/@specwin/toPlist.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/classes/@specwin/toPlist.m	Wed Nov 23 19:22:13 2011 +0100
@@ -0,0 +1,20 @@
+% TOPLIST creates a plist representing the specwin object.
+%
+% CALL:   pl = w.toPlist;
+% 
+% M Hewitson 15-08-11
+% 
+% $Id: toPlist.m,v 1.1 2011/08/15 06:45:43 hewitson Exp $
+% 
+
+function pl = toPlist(win)
+  switch lower(win.type)
+    case 'kaiser'
+      pl = plist('win', win.type, 'length', win.len, 'psll', win.psll);
+    case 'levelledhanning'
+      pl = plist('win', win.type, 'length', win.len, 'levelorder', win.levelorder);
+    otherwise
+      pl = plist('win', win.type, 'length', win.len);
+  end
+end
+ 
\ No newline at end of file