%
%  Displays partial reconstructions at various scales of the
%  2D wavelet decomposition of the woman image which is 256x256 and has
%  been placed in the variable X and the colormap in mapX.
%
makeimage(X);
pause;
[C S]=wavedec2(X,8,'haar');
S
size(C)
A1=wrcoef2('a',C,S,'haar',1);

makeimage(A1)
pause;
A2=wrcoef2('a',C,S,'haar',2);
makeimage(A2)
pause;
A3=wrcoef2('a',C,S,'haar',3);
makeimage(A3)
pause;
D1H=wrcoef2('h',C,S,'haar',1);
makeimage(D1H)
%brighten(.5);
%brighten(.5);
%brighten(.5);
pause;
D1V=wrcoef2('v',C,S,'haar',1);
makeimage(D1V)
pause;
D1D=wrcoef2('d',C,S,'haar',1);
makeimage(D1D)
pause;
D2H=wrcoef2('h',C,S,'haar',2);
makeimage(D2H)
pause;
D2V=wrcoef2('v',C,S,'haar',2);
makeimage(D2V)
pause;
D2D=wrcoef2('d',C,S,'haar',2);
makeimage(D2D)
pause;
D3H=wrcoef2('h',C,S,'haar',3);
makeimage(D3H)
pause;
D3V=wrcoef2('v',C,S,'haar',3);
makeimage(D3V)
pause;
D3D=wrcoef2('d',C,S,'haar',3);
makeimage(D3D)
%pause;



