count-neighbors ( world -- neighbors )


Vocabulary
rosetta-code.one-d-cellular

Inputs
worldan object


Outputs
neighborsan object


Definition
USING: kernel sequences ;

IN: rosetta-code.one-d-cellular

: count-neighbors ( world -- neighbors )
[ length <iota> ] keep [ neighbors ] curry map ;