make-b-rep-vertices ( b-rep selected -- vertices face-indices edge-indices point-indices )


Vocabulary
gml.viewer

Inputs and outputs
b-repan object
selectedan object
verticesan object
face-indicesan object
edge-indicesan object
point-indicesan object


Definition


:: make-b-rep-vertices
( b-rep selected -- vertices face-indices edge-indices point-indices )
b-rep selected b-rep-face-vertices
:> ( face-vertices face-count face-indices ) b-rep
b-rep-edge-vertices :> ( edge-vertices edge-count ) selected
selected-vertices :> ( sel-vertices sel-count )
face-vertices face-count edge-vertices edge-count
sel-vertices sel-count <b-rep-vertices>
:> vertices vertices array>> face-indices b-rep selected
vertices face-vertex-count>> b-rep-edge-index-array vertices
[ face-vertex-count>> ] [ edge-vertex-count>> + dup ]
[ point-vertex-count>> + ] tri [a,b) ushort >c-array ;