liftscheme.m

此为基于二代提升小波的阈值压缩算法源码

%**************************************************************************
% 函数说明：计算选用小波的提升方案（这里限于db1--db8，sym1--sym8及双正交小波）
% 输入参数：wname为小波名称；flag为'Int2Int'时进行整数到整数的小波变换
% 返回值：返回小波wname相关的提升方案
%**************************************************************************
function LS = LiftScheme(wname,flag)

switch wname(1)
          case 'b' , LS = BiorLift(wname);  % Biorthogonal wavelets
          case 'd' , LS = DbLift(wname);    % Daubechies wavelets
          case 's' , LS = SymLift(wname);   % Symmetric wavelets
end
if nargin>1 , LS{end,3} = 'I'; end   %进行整数到整数的小波变换