% WENERGY   僂僃乕僽儗僢僩僷働僢僩暘夝偵懳偡傞僄僱儖僊
%
% 僂僃乕僽儗僢僩僷働僢僩僣儕乕 T 偵懳偟偰(WPTREE, WPDEC, WPDEC2 傪嶲徠)丄
% E = WENERGY(T) 偼丄僣儕乕 T 偺廔抂僲乕僪偵懳墳偡傞僄僱儖僊偺僷乕僙儞
% 僥乕僕傪娷傓儀僋僩儖 E 傪弌椡偟傑偡丅
%
% 椺戣:
%     load noisbump
%     T = wpdec(noisbump,3,'sym4');
%     E = wenergy(T)
%     ------------------------------
%     load detail
%     T = wpdec2(X,2,'sym4');
%     E = wenergy(T)


%   M. Misiti, Y. Misiti, G. Oppenheim, J.M. Poggi 12-Mar-96.
%   Last Revision: 14-May-2003.
%   Copyright 1995-2004 The MathWorks, Inc.