partition-card-faces-main-card ( seq quot -- seq )


Vocabulary
scryfall

Inputs
seqan object
quotan object


Outputs
seqan object


Definition
USING: assocs kernel sequences ;

IN: scryfall

: partition-card-faces-main-card ( seq quot -- seq )
dup [ [ any? ] curry ] dip
[ [ [ [ "card_faces" of ] ] ] dip ] dip [ ?if ] 2curry
compose partition ; inline