init-bodies ( bodies -- )

Vocabulary

benchmark.nbody-simd

Inputs

bodies

an object

Outputs

None

Definition

USING: accessors kernel math.vectors sequences ;

IN: benchmark.nbody-simd

: init-bodies ( bodies -- )
    [ first ]
    [ [ [ velocity>> ] [ mass>> ] bi v*n ] [ v+ ] map-reduce ]
    bi offset-momentum drop ; inline