Huffman encoding/decoding of sequences in Common Lisp