85  * need for the L_CODES extra codes used during heap construction. However
289 /* Index within the heap array of least frequent node in the Huffman tree */
293  * Remove the smallest element from the heap and recreate the heap with
294  * one less element. Updates heap and heap_len.
298     top = s->heap[SMALLEST]; \
299     s->heap[SMALLEST] = s->heap[s->heap_len--]; \
312  * Restore the heap property by moving down the tree starting at node k,
314  * when the heap property is re-established (each father smaller than its
323     int v = s->heap[k];  in pqdownheap()
328             smaller(tree, s->heap[j+1], s->heap[j], s->depth)) {  in pqdownheap()
332         if (smaller(tree, v, s->heap[j], s->depth)) break;  in pqdownheap()
335         s->heap[k] = s->heap[j];  k = j;  in pqdownheap()
340     s->heap[k] = v;  in pqdownheap()
346  * IN assertion: the fields freq and dad are set, heap[heap_max] and
364     int h;              /* heap index */  in gen_bitlen()
376     tree[s->heap[s->heap_max]].Len = 0; /* root of the heap */  in gen_bitlen()
379         n = s->heap[h];  in gen_bitlen()
420             m = s->heap[--h];  in gen_bitlen()
492     int n, m;          /* iterate over heap elements */  in build_tree()
496     /* Construct the initial heap, with least frequent element in  in build_tree()
497      * heap[SMALLEST]. The sons of heap[n] are heap[2*n] and heap[2*n+1].  in build_tree()
498      * heap[0] is not used.  in build_tree()
504             s->heap[++(s->heap_len)] = max_code = n;  in build_tree()
517         node = s->heap[++(s->heap_len)] = (max_code < 2 ? ++max_code : 0);  in build_tree()
525     /* The elements heap[heap_len/2+1 .. heap_len] are leaves of the tree,  in build_tree()
536         m = s->heap[SMALLEST]; /* m = node of next least frequency */  in build_tree()
538         s->heap[--(s->heap_max)] = n; /* keep the nodes sorted by frequency */  in build_tree()
539         s->heap[--(s->heap_max)] = m;  in build_tree()
551         /* and insert the new node in the heap */  in build_tree()
552         s->heap[SMALLEST] = node++;  in build_tree()
557     s->heap[--(s->heap_max)] = s->heap[SMALLEST];  in build_tree()