gml-clamp ( registers gml -- registers gml )

Vocabulary

gml.coremath

Inputs

registers	an object
gml	an object

Outputs

registers	an object
gml	an object

Definition

USING: gml.runtime kernel.private math.order sequences ;

IN: gml.coremath

: gml-clamp ( registers gml -- registers gml )
    { gml } declare 2 1 [ first2 clamp ] gml-primitive ;