row-to-cells ( seq quot -- cells )


Vocabulary
gamelib.board

Inputs
seqan object
quotan object


Outputs
cellsan object


Definition
USING: sequences sequences.extras ;

IN: gamelib.board

:: row-to-cells ( seq quot -- cells )
seq first2 :> ( y row ) row quot find-all
:> indexed-cells indexed-cells [ first2 y label-cell ] map ;
inline