www.pudn.com > EWT.rar > EWT2D_Meyer_FilterBank.m, change:2015-07-21,size:1529b

```function mfb=EWT2D_Meyer_FilterBank(boundaries,W,H)

% =========================================================================
% function mfb=EWT2D_Meyer_FilterBank(boundaries,W,H)
%
% This function generate the 2D filter bank (scaling function + wavelets)
% corresponding to the provided set of frequency rings
%
% Input parameters:
%   -boundaries: vector containing the boundaries of frequency rings (0
%                and pi must NOT be in this vector)
%   -W: image width
%   -H: image height
%
% Output:
%   -mfb: cell containing each filter (in the Fourier domain), the scaling
%         function comes first and then the successive wavelets
%
% Author: Jerome Gilles - Giang Tran
% Institution: UCLA - Department of Mathematics
% Year: 2013
% Version: 1.0
% =========================================================================

Npic=length(boundaries);

% We compute gamma accordingly to the theory
gamma=1;
for k=1:Npic-1
r=(boundaries(k+1)-boundaries(k))/(boundaries(k+1)+boundaries(k));
if r<gamma
gamma=r;
end
end

r=(pi-boundaries(Npic))/(pi+boundaries(Npic));
if r<gamma
gamma=r;
end
gamma=(1-1/max(W,H))*gamma; %this ensure that gamma is chosen as strictly less than the min

mfb=cell(Npic+1,1);
% We start by generating the scaling function
mfb{1}=EWT2D_Meyer_Scaling(boundaries(1),gamma,W,H);

% We generate the wavelets
for k=1:Npic-1
mfb{k+1}=EWT2D_Meyer_Wavelet(boundaries(k),boundaries(k+1),gamma,W,H);
end
mfb{Npic+1}=EWT2D_UP_Meyer_Wavelet(boundaries(Npic),gamma,W,H);```