在haskell中实现解压缩函数

在haskell中实现解压缩函数