2random ( a b -- num )

Vocabulary

bubble-chamber

Inputs

a	an object
b	an object

Outputs

num

an object

Definition

USING: kernel math random ranges ;

IN: bubble-chamber

: 2random ( a b -- num ) 2dup swap - 100 / <range> random ;