best-bounty ( -- bounty )

Vocabulary

rosetta-code.knapsack-unbounded

Inputs

None

Outputs

bounty

an object

Definition

USING: math math.order sequences sequences.product ;

IN: rosetta-code.knapsack-unbounded

: best-bounty ( -- bounty )
    find-max-amounts [ 1 + <iota> ] map <product-sequence>
    [ <bounty> ] [ max ] map-reduce ;