а теперь и вейвлет на Haskell