二维的Haar小波变换

function [LL LH HL HH]=haar_dwt2D（img）
    [m n]=size（img）;
    for i=1:m       %每一行进行分解
        [L H]=haar_dwt（img（i:））;
        img（i:）=[L H];
    end
    for j=1:n       %每一列进行分解
       [L H]=haar_dwt（img（:j））;
       img（:j）=[L H];
    end