reduce-combinations-with-replacement ( ... seq k identity quot: ( ... prev elt -- ... next ) -- ... result )

Vocabulary

math.combinatorics

Inputs

seq	an object
k	an object
identity	an object
quot	a quotation with stack effect ( ... prev elt -- ... next )

Outputs

result

an object

Definition

USING: kernel ;

IN: math.combinatorics

: reduce-combinations-with-replacement
    ( ... seq k identity quot: ( ... prev elt -- ... next ) -- ... result )
    -rotd each-combination-with-replacement ; inline