Wavelet Packet Modulation and Demodulation

function y=wpm(x,N,wname);
% N-band wavelet packet modulator.
% y is a 1-D signal reconstructed from N equal-length data streams arranged
% as the rows of the matix x. The idwt function is used with the required
% wavelet family denoted by the input wname.
% The value of N represents the number of bands and it must be an integer
% power of 2.
% The periodization mode is selected for data extension.
% This function is built by Abdulrahman Ikram Siddiq Oct-4th-2011 9:30pm.

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
function x=wpdm(y,N,wname);

% N-band wavelet packet demodulator.
% y is a 1-D signal is analysed to N equal-length data streams arranged
% as the rows of the matix x. The dwt function is used with the required
% wavelet family denoted by the input wname.
% The value of N represents the number of bands and it must be an integer
% power of 2.
% The periodization mode is selected for data extension.
% This function is built by Abdulrahman Ikram Siddiq Oct-4th-2011 9:45pm.