prime-pair? ( m n -- ? )

Vocabulary

project-euler.060

Inputs

m	an object
n	an object

Outputs

?

an object

Definition

USING: combinators.short-circuit kernel math.primes ;

IN: project-euler.060

: prime-pair? ( m n -- ? )
    { [ join-numbers prime? ] [ swap join-numbers prime? ] } 2&&
    ;