in-radius? ( self other radius -- ? )


Vocabulary
boids.simulation

Inputs
selfan object
otheran object
radiusan object


Outputs
?an object


Definition
USING: accessors kernel math math.vectors ;

IN: boids.simulation

: in-radius? ( self other radius -- ? )
[ [ pos>> ] bi@ distance ] dip <= ; inline