This function generate the Haar wavelet filter bank. No input parameters are required.
function wavHaar output Real F[:] "Scaling filter"; output Real lod[:] "High pass filter for decomposition"; output Real hid[:] "Low pass filter for decomposition"; output Real lor[:] "High pass filter for reconstruction"; output Real hir[:] "Low pass filter for reconstruction"; end wavHaar;