filter-card-faces ( json quot -- seq )


Vocabulary
scryfall

Inputs
jsonan object
quotan object


Outputs
seqan object


Definition
USING: assocs kernel sequences ;

IN: scryfall

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