gml-makeEV ( registers gml -- registers gml )

Vocabulary

gml.b-rep

Inputs

registers	an object
gml	an object

Outputs

registers	an object
gml	an object

Definition

USING: euler.operators gml.macros gml.runtime kernel.private ;

IN: gml.b-rep

: gml-makeEV ( registers gml -- registers gml )
    { gml } declare 3 1
    [ \ makeEV-record [ make-ev ] 3 log-euler-op ] gml-primitive
    ;