update-position ( body dt -- )


Vocabulary
benchmark.nbody-simd

Inputs
bodyan object
dtan object


Outputs
None

Definition
USING: accessors kernel math.vectors ;

IN: benchmark.nbody-simd

: update-position ( body dt -- )
[ dup velocity>> ] dip [ v*n v+ ] 2curry change-location
drop ; inline