有关单层小波分解与重构matlab程序

load leleccum;
s = leleccum（1:3920）;
l_s = length（s）;
%coefficients of the level 1 approximation （cA1） and detail （cD1）.
[cA1cD1] = dwt（s‘db1‘）;
%construct the level 1 approximation and detail （A1 and D1） from the
%coefficients cA1 and cD1
A1 = upcoef（‘a‘cA1‘db1‘1l_s）;   %A1 = idwt（cA1[]‘db1‘l_s）; 
D1 = upcoef（‘d‘cD1‘db1‘