make-loop ( vertex face -- edge )

Vocabulary

euler.operators.private

Inputs

vertex	an object
face	an object

Outputs

edge

an object

Definition

USING: accessors euler.b-rep namespaces ;

IN: euler.operators.private

:: make-loop ( vertex face -- edge )
    b-rep get new-edge :> edge vertex edge vertex<<
    edge edge next-edge<< face edge face<< edge ;