prepare-departments ( seq -- departments )

Vocabulary

rosetta-code.top-rank

Inputs

seq

an object

Outputs

departments

an object

Definition

USING: accessors assocs sorting ;

IN: rosetta-code.top-rank

: prepare-departments ( seq -- departments )
    [ department>> ] collect-by
    [ [ salary>> ] inv-sort-by ] assoc-map ;