Adds creases to a smooth mesh by creating coincident vertices.
Rhino.UnweldMesh (strObject, dblAngleTolerance, blnModifyNormals)
strObject |
Required. String. The identifier of a mesh object. |
dblAngleTolerance |
Required. Number. The angle tolerance in degrees. |
blnModifyNormals |
Optional. Boolean. If True (Default), the vertex normals on each side of the edge take the same value as the face to which they belong, giving the mesh a hard edge look. If False, each of the vertex normals on either side of the edge is assigned the same value as the original normal that the pair is replacing, keeping a smooth look. |
Boolean |
True of False indicating success or failure. |
Null |
On error. |
Const rhObjectMesh = 32
Dim strObject
strObject = Rhino.GetObject("Select mesh to unweld", rhObjectMesh)
If Rhino.IsMesh(strObject) Then
Call Rhino.UnweldMesh(strObject, 10.0)
End If