edwttree.m
上传用户:haiyisale
上传日期:2013-01-09
资源大小:3246k
文件大小:2k
- function t = edwttree(x,depth,wname,modeDWT,userdata)
- %EDWTTREE Constructor for the class EDWTTREE.
- % T = EDWTTREE(X,DEPTH,WNAME) returns an epsilon_dwt tree T.
- % If X is a vector, the tree is of order 2.
- % If X is a matrix, the tree is of order 4.
- % The DWT extension mode is the current one.
- %
- % T = EDWTTREE(X,DEPTH,WNAME,DWTMODE) returns an epsilon_dwt tree T
- % built using DWTMODE as DWT extension mode.
- %
- % With T = EDWTTREE(X,DEPTH,WNAME,DWTMODE,USERDATA)
- % you may set a userdata field.
- % M. Misiti, Y. Misiti, G. Oppenheim, J.M. Poggi 09-Sep-1999.
- % Last Revision: 14-May-2003.
- % Copyright 1995-2004 The MathWorks, Inc.
- % $Revision: 1.5.4.2 $ $Date: 2004/03/15 22:36:01 $
- %===============================================
- % Class RWVTREE (parent class: DTREE)
- % Fields:
- % dtree - Parent object
- % dwtMode - DWTMODE type
- % wavInfo - Structure (wavelet infos)
- % wavName : Wavelet Name.
- % Lo_D : Low Decomposition filter
- % Hi_D : High Decomposition filter
- % Lo_R : Low Reconstruction filter
- % Hi_R : High Reconstruction filter
- %===============================================
- % Check arguments.
- %-----------------
- nbIn = nargin;
- if nbIn < 3
- error('Not enough input arguments.');
- end
- switch nbIn
- case 3 , userdata = {}; modeDWT = 'per';
- case 4 , userdata = {};
- end
- % Tree creation.
- %---------------
- order = 4;
- t = dtree(order,depth,x,'spsch',[1 0 0 1],'spflg',0,'ud',userdata);
- % Dwtmode & Wavelet infos.
- %--------------------------
- obj.dwtMode = modeDWT;
- obj.waveInfo.wavName = wname;
- [ obj.waveInfo.Lo_D,obj.waveInfo.Hi_D, ...
- obj.waveInfo.Lo_R,obj.waveInfo.Hi_R ] = wfilters(wname);
- % Built object.
- %---------------
- t = class(obj,'edwttree',t);
- t = expand(t);