gl3-scale ( sx sy -- )

Vocabulary

ui.render

Inputs

sx	an object
sy	an object

Outputs

None

Definition

USING: kernel namespaces ;

IN: ui.render

:: gl3-scale ( sx sy -- )
    sx sy make-scale-matrix
    :> scale-mat current-modelview get-global scale-mat
    mat4-multiply
    [ current-modelview set-global ] [ set-gl3-modelview ] bi ;