wasd-mv-matrix ( world -- matrix )


Vocabulary
gpu.util.wasd

Inputs
worldan object


Outputs
matrixan object


Definition
USING: accessors kernel math.matrices math.matrices.extras
math.vectors ;

IN: gpu.util.wasd

: wasd-mv-matrix ( world -- matrix )
[ { 1.0 0.0 0.0 } swap pitch>> <rotation-matrix4> ]
[ { 0.0 1.0 0.0 } swap yaw>> <rotation-matrix4> ]
[ location>> vneg <translation-matrix4> ] tri mdot mdot ;