gml-approx-eq ( 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 gml.types kernel.private math.functions
math.vectors ;

IN: gml.coremath

: gml-approx-eq ( registers gml -- registers gml )
    { gml } declare 2 1 [
        [ 0.0001 ~ ] [ 0.0001 v~ ] [ 0.0001 v~ ] gml-math-op
        >true
    ] gml-primitive ;