
 c0=ones(8,8) 
 [c1 d11 d12 d13]=dwt2(c0,'haar') 

%-----------------------------------

c0=[1 1 1 1 1 1 1 1 -1 -1 -1 -1 -1 -1 -1 -1 1 1 1 1 1 1 1 1 -1 -1 -1 -1 -1 -1 -1 -1 1 1 1 1 1 1 1 1 -1 -1 -1 -1 -1 -1 -1 -1 1 1 1 1 1 1 1 1 -1 -1 -1 -1 -1 -1 -1 -1];
[c1 d11 d12 d13]=dwt2(c0,'haar')

%--------------------------------------
c0=[100 50 60 150
    20 60 40 30
    50 90 70 82
    74 66 90 58];
[c1 d11 d12 d13]=dwt2(c0,'haar')

%----------------------------------------