step-theta ( p -- p )


Vocabulary
bubble-chamber

Inputs
pan object


Outputs
pan object


Definition
USING: accessors kernel math ;

IN: bubble-chamber

: step-theta ( p -- p )
[ ] [ theta>> ] [ theta-d>> ] tri + >>theta ;