bouncy? ( n -- ? )

Vocabulary

project-euler.112.private

Inputs

n

an object

Outputs

?

an object

Definition

USING: kernel project-euler.common sequences sorting ;

IN: project-euler.112.private

: bouncy? ( n -- ? )
    number>digits dup sort [ = not ] [ reverse = not ] 2bi and ;