Create huffman.hs