function y=ihaar2d(y)
    n=length(y);
    for i=1:n
        y(i,:)=ihaar1d(y(i,:));
    end
    for i=1:n
        y(:,i)=ihaar1d(y(:,i));
    end
end
