randomize-collision-theta ( bubble-chamber -- bubble-chamber )

Vocabulary

bubble-chamber

Inputs

bubble-chamber

an object

Outputs

bubble-chamber

an object

Definition

USING: accessors math math.constants random ranges ;

IN: bubble-chamber

: randomize-collision-theta
    ( bubble-chamber -- bubble-chamber )
    pi neg pi 0.001 <range> random >>collision-theta ;