<deck> ( -- deck )

Vocabulary

poker

Inputs

None

Outputs

deck	a sequence

Word description

Returns a vector containing a standard, shuffled deck of 52 cards.

Definition

USING: arrays poker.private random sequences sequences.product ;

IN: poker

: <deck> ( -- deck )
    RANKS SUITS 2array [ concat >ckf ] V{ } product-map-as
    randomize ;