moving-count ( ... u n quot: ( ... elt -- ... ? ) -- ... v )

Vocabulary

math.extras

Inputs

u	an object
n	an object
quot	a quotation with stack effect ( ... elt -- ... ? )

Outputs

v

an object

Definition

USING: grouping kernel sequences ;

IN: math.extras

: moving-count
    ( ... u n quot: ( ... elt -- ... ? ) -- ... v )
    [ <clumps> ] [ [ count ] curry map ] bi* ; inline