rsa-primes ( numbits -- p q )

Vocabulary

crypto.rsa.private

Inputs

numbits

an object

Outputs

p	an object
q	an object

Definition

USING: kernel math math.primes sequences ;

IN: crypto.rsa.private

: rsa-primes ( numbits -- p q ) 2/ 2 swap unique-primes first2 ;