gml-project_ptline ( registers gml -- registers gml )

Vocabulary

gml.modeling

Inputs

registers	an object
gml	an object

Outputs

registers	an object
gml	an object

Definition

USING: euler.modeling gml.runtime kernel.private ;

IN: gml.modeling

: gml-project_ptline ( registers gml -- registers gml )
    { gml } declare 3 1 [ project-pt-line ] gml-primitive ;