function compare

load('handel.mat')
hallelujah=y(1:65536);
Y=fft(hallelujah);
plot(1:65536, Y)

figure;
Z=wavekitHaar(hallelujah);
plot(1:65536, Z)

end;