Line data    Source code

       1             : """
       2             :     removevertex!(mesh, v::VHnd)
       3             : 
       4             : Remove vertex `v` **and any face incident** to `v`.
       5             : 
       6             : No effect if `v` is not used.
       7             : """
       8          11 : function removevertex!(mesh::Mesh, v::VHnd)
       9          11 :     !isused(mesh, v) && return v
      10             : 
      11          42 :     while !isempty(fan(mesh, v))
      12          31 :         removeface!(mesh, first(fan(mesh, v)))
      13          31 :     end
      14             : 
      15          11 :     _setunused!(mesh, v)
      16             : 
      17          11 :     v
      18             : end