new-vertex ( position b-rep -- vertex )


Vocabulary
euler.b-rep

Inputs
positionan object
b-repan object


Outputs
vertexan object


Definition
USING: accessors kernel sequences ;

IN: euler.b-rep

: new-vertex ( position b-rep -- vertex )
[ f vertex boa dup ] dip vertices>> push ; inline