drag-heading ( player -- heading )


Vocabulary
jamshred.player

Inputs
playeran object


Outputs
headingan object


Definition
USING: accessors kernel math.vectors ;

IN: jamshred.player

: drag-heading ( player -- heading )
[ forward>> ] [ nearest-segment>> forward>> proj ] bi ;