Removes creases from a mesh by merging coincident mesh vertices.
Rhino.WeldMesh (strObject, dblAngleTolerance)
strObject |
Required. String. The identifier of a mesh object. |
dblAngleTolerance |
Required. Number. The angle tolerance in degrees. If two naked mesh edge points of a mesh are coincident, and their neighboring faces are within the angle tolerance of each other, they will be replaced by a single mesh point. If the two points are from different "sub-meshes" of a joined mesh, the meshes become one mesh that cannot explode. |
Boolean |
True of False indicating success or failure. |
Null |
On error. |
Const rhObjectMesh = 32
Dim strObject
strObject = Rhino.GetObject("Select mesh to weld", rhObjectMesh)
If Rhino.IsMesh(strObject) Then
Call Rhino.WeldMesh(strObject, 10.0)
End If