5 (define (range min max (step 1))
8 (cons min (range (+ min step) max step))))
11 (define tree5 (for/list ((x (range 0 5))
15 (generate-huffman-tree tree5)
17 Most frequently used symbol is E and has the code 1
18 Least frequently used symbol is A and has the code 0000
22 (define tree10 (for/list ((x (range 0 10))
23 (a '(A B C D E F G H I J)))
26 (generate-huffman-tree tree10)