shuffle-word

Vocabulary

shuffle

Definition

USING: accessors combinators.short-circuit effects kernel
sequences words ;

IN: shuffle

PREDICATE: shuffle-word < word
    def>> {
        [ length 2 = ]
        [ first effect? ]
        [ last \ shuffle-effect = ]
    } 1&& ;

Methods

USING: definitions kernel shuffle ;

M: shuffle-word definer drop \ SHUFFLE: f ;


USING: definitions kernel shuffle ;

M: shuffle-word definition drop f ;