function
B = ihaar_row(A);
% This function inverts the sums and differences
row-wise for the Haar
% Transform.
The result is then placed back into the input matrix.
n =
length(A);
for i = 1:n
num = 1;
for j =
1:(n/2)
B(i,num)
= (A(i,j) +
A(i,j+(n/2)))/sqrt(2);
B(i,num+1) = (A(i,j) - A(i,j+(n/2)))/sqrt(2);
num = num + 2;
end
end