o bc]Y@sB dZgdZddZddZddZdd Zd d Zd d ZddZddZ ddZ ddZ ddZ ddZ dddddZd)dd Zd)d!d"Zzd#d$lTWn eyXYnwzd#d%lmZWn eyjYnwzd#d&lm Z Wn ey|Ynwzd#d'lmZWn eyYnwed(krd#dlZeedSdS)*uoHeap queues [explanation by François Pinard] Heaps are arrays for which a[k] <= a[2*k+1] and a[k] <= a[2*k+2] for all k, counting elements from 0. For the sake of comparison, non-existing elements are considered to be infinite. The interesting property of a heap is that a[0] is always its smallest element. The strange invariant above is meant to be an efficient memory representation for a tournament. The numbers below are `k', not a[k]: 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 In the tree above, each cell `k' is topping `2*k+1' and `2*k+2'. In a usual binary tournament we see in sports, each cell is the winner over the two cells it tops, and we can trace the winner down the tree to see all opponents s/he had. However, in many computer applications of such tournaments, we do not need to trace the history of a winner. To be more memory efficient, when a winner is promoted, we try to replace it by something else at a lower level, and the rule becomes that a cell and the two cells it tops contain three different items, but the top cell "wins" over the two topped cells. If this heap invariant is protected at all time, index 0 is clearly the overall winner. The simplest algorithmic way to remove it and find the "next" winner is to move some loser (let's say cell 30 in the diagram above) into the 0 position, and then percolate this new 0 down the tree, exchanging values, until the invariant is re-established. This is clearly logarithmic on the total number of items in the tree. By iterating over all items, you get an O(n ln n) sort. A nice feature of this sort is that you can efficiently insert new items while the sort is going on, provided that the inserted items are not "better" than the last 0'th element you extracted. This is especially useful in simulation contexts, where the tree holds all incoming events, and the "win" condition means the smallest scheduled time. When an event schedule other events for execution, they are scheduled into the future, so they can easily go into the heap. So, a heap is a good structure for implementing schedulers (this is what I used for my MIDI sequencer :-). Various structures for implementing schedulers have been extensively studied, and heaps are good for this, as they are reasonably speedy, the speed is almost constant, and the worst case is not much different than the average case. However, there are other representations which are more efficient overall, yet the worst cases might be terrible. Heaps are also very useful in big disk sorts. You most probably all know that a big sort implies producing "runs" (which are pre-sorted sequences, which size is usually related to the amount of CPU memory), followed by a merging passes for these runs, which merging is often very cleverly organised[1]. It is very important that the initial sort produces the longest runs possible. Tournaments are a good way to that. If, using all the memory available to hold a tournament, you replace and percolate items that happen to fit the current run, you'll produce runs which are twice the size of the memory for random input, and much better for input fuzzily ordered. Moreover, if you output the 0'th item on disk and get an input which may not fit in the current tournament (because the value "wins" over the last output value), it cannot fit in the heap, so the size of the heap decreases. The freed memory could be cleverly reused immediately for progressively building a second heap, which grows at exactly the same rate the first heap is melting. When the first heap completely vanishes, you switch heaps and start a new run. Clever and quite effective! In a word, heaps are useful memory structures to know. I use them in a few applications, and I think it is good to keep a `heap' module around. :-) -------------------- [1] The disk balancing algorithms which are current, nowadays, are more annoying than clever, and this is a consequence of the seeking capabilities of the disks. On devices which cannot seek, like big tape drives, the story was quite different, and one had to be very clever to ensure (far in advance) that each tape movement will be the most effective possible (that is, will best participate at "progressing" the merge). Some tapes were even able to read backwards, and this was also used to avoid the rewinding time. Believe me, real good tape sorts were quite spectacular to watch! From all times, sorting has always been a Great Art! :-) )heappushheappopheapify heapreplacemergenlargest nsmallest heappushpopcCs$ ||t|dt|ddS)N)append _siftdownlenheapitemrf/home/lily/lilypond-2.24.1/release/binaries/dependencies/install/Python-3.10.8/lib/python3.10/heapq.pyrs rcC0 |}|r|d}||d<t|d|S|SNr )pop_siftuprZlastelt returnitemrrrr rcC |d}||d<t|d|Srrrrrrrrrs   rcCs2 |r|d|kr|d|}|d<t|d|Srrrrrrrs  rcC. t|}tt|dD]}t||q dSN)r reversedrangerxnirrrrs  rcCrr)r _siftup_maxrrrr _heappop_maxrr'cCrr)r&rrrr_heapreplace_maxs  r(cCrr)r r r!r&r"rrr _heapify_maxs  r)cCsH||}||kr|dd?}||}||kr|||<|}q |||<dSNr rrstartposposnewitemZ parentposparentrrrr s  r cCst|}|}||}d|d}||kr8|d}||kr&||||ks&|}||||<|}d|d}||ks|||<t|||dSNrr )r r rr-endposr,r.ZchildposZrightposrrrrs    rcCsJ ||}||kr|dd?}||}||kr|||<|}q |||<dSr*rr+rrr _siftdown_maxs  r3cCs t|}|}||}d|d}||kr9|d}||kr'||||ks'|}||||<|}d|d}||ks|||<t|||dSr0)r r3r1rrrr&%s    r&NFkeyreversec gs g}|j}|rt}t}t}d}nt}t}t}d}|durttt |D]\} } z| j } || | || gWq%t yAYq%w||t |dkrxz |d\} } } } | V| | d<||| qNt yq||Ynwt |dksL|r|d\} } } | V| j EdHdSttt |D]!\} } z| j } | } ||| | || | gWqt yYqw||t |dkrz! |d\}} } } } | V| } || | d<| | d<||| qt y||Ynwt |dks|r |d\}} } } | V| j EdHdSdS)Nr Tr r)r r)r'r(rrr enumeratemapiter__next__ StopIterationr __self__)r5r6 iterableshZh_appendZ_heapifyZ_heappop _heapreplaceZ directionorderitnextvaluesZ key_valuerrrr:s                 rc s |dkrt|}t}t||d}||urgS|gSzt|}Wn ttfy-Ynw||krznsmallest..r cSg|]\}}|qSrrrKrLrArrrrMcg|] \}}|||fqSrrrJrHrrrMcSg|]\}}}|qSrrrKkrArLrrrrM) r:objectminr TypeErrorAttributeErrorsortedzipr!r)r(sortr$iterabler5rBsentinelresultsizetoprAr@rLZ_orderrVZ_elemrrHrrs^    rc s |dkrt|}t}t||d}||urgS|gSzt|}Wn ttfy-Ynw||kr=t|ddd|Sdurt|}ddttd| d|D}|sX|St ||dd}| }t } |D]} || kr| || |f|d\}} |d8}qi|j dd d d|DSt|}fd dttd| d|D}|s|St ||dd}| }t } |D]} | } || kr| || || f|d\}} } |d8}q|j dd d d|DS) Nr rFTr4cSrIrrrJrrrrM"rNznlargest..r r7)r6cSrOrrrPrrrrM/rQcrRrrrJrHrrrM3rScSrTrrrUrrrrMArW) r:rXmaxr rZr[r\r]r!rrr^r_rrHrr s^    "  rr )*)r()r))r'__main__)N)Z __about____all__rrrrrr'r(r)r rr3r&rrrZ_heapq ImportError__name__ZdoctestprintZtestmodrrrrsV ^    5  <;