% waveletdwt.m displays the wavelet transform for the signal in wavelets.wav

clf;

[w]=wavread('wavelets.wav');% read "wavelets" data file
w=w-mean(w);                % center the data
h=[1 2 1]/sqrt(8);          % multiresolution coefficients for triangle wavelet
h=[1 1]/sqrt(2);            % multiresolution coefficients for Haar wavelet
                            % put the h you want to use second
showdwt(w',h,44100);