next-safe-prime-candidate ( n -- candidate )

Vocabulary

math.primes.safe.private

Inputs

n

an object

Outputs

candidate

an object

Definition

USING: kernel math.primes ;

IN: math.primes.safe.private

: next-safe-prime-candidate ( n -- candidate )
    next-prime dup safe-prime-candidate?
    [ next-safe-prime-candidate ] unless ;