black-bishop ( positions -- position positions' )

Vocabulary

chess960

Inputs

positions

an object

Outputs

position	an object
positions'	an object

Definition

USING: kernel random ;

IN: chess960

: black-bishop ( positions -- position positions' )
    [ black-bishop-positions random ] dip frisk ;