walk-upward ( world -- )


Vocabulary
gpu.util.wasd

Inputs
worldan object


Outputs
None

Definition
USING: accessors kernel math.vectors ;

IN: gpu.util.wasd

: walk-upward ( world -- )
dup wasd-movement-speed { 0.0 1.0 0.0 } n*v [ v+ ] curry
change-location drop ;