wave2test.m

It is the code to demonstrate actof filtering

x = cos((0:63)/64*2*pi);
[c,L] = wavedec(x,'haar',6);
plot(wrcoef('a',c,L,'haar',2));pause;
plot(wrcoef('d',c,L,'haar',2));