>max-heap ( assoc -- max-heap )

Vocabulary

heaps

Inputs

assoc

an object

Outputs

max-heap

an object

Definition

USING: assocs kernel vectors ;

IN: heaps

: >max-heap ( assoc -- max-heap )
    dup assoc-size <vector> max-heap boa [ heap-push-all ] keep
    ;