Hi, all
I'm in the troublie that the value for "MeshGenerator.ChordAngle" does not work even I change the value.
Does anybody knows how to make it works?
<Sample in case Chord Angle option is "10 deg" for meshing process>
SetLocale("en-us")
Set Synergy = CreateObject("synergy.Synergy")
Synergy.SetUnits "Metric"
Set MeshGenerator = Synergy.MeshGenerator()
MeshGenerator.EdgeLength 4
MeshGenerator.MergeTolerance 0.1
MeshGenerator.Match True
MeshGenerator.Smoothing True
MeshGenerator.ElementReduction True
MeshGenerator.SurfaceOptimization True
MeshGenerator.AutomaticTetraOptimization True
MeshGenerator.TetraRefine True
MeshGenerator.TetraLayers 6
MeshGenerator.TetraMaxAR 15
MeshGenerator.UseTetrasOnEdge False
MeshGenerator.MaximumMatchDistance 1e+023
MeshGenerator.MaximumMatchDistanceOption 0
MeshGenerator.RemeshAll False
MeshGenerator.UseActiveLayer False
MeshGenerator.PostMeshActions True
MeshGenerator.MergeCavityRunner True
MeshGenerator.ChordHeightControl True
MeshGenerator.ChordHtAspectRatio False
MeshGenerator.ChordHtProximity False
MeshGenerator.ChordHeight 0.1
MeshGenerator.NurbsMesher 1
MeshGenerator.SourceGeomType "Auto-Detect"
MeshGenerator.ChordAngleSelect True
MeshGenerator.ChordAngle 0.174603 '<========================= Does NOT work !!
MeshGenerator.CadContactMeshType "Ignore contact"
MeshGenerator.CadSliverRemove False
MeshGenerator.Mesher3D "AdvancingFront"
MeshGenerator.MaxEdgeLengthInThicknessDirection 0
MeshGenerator.SaveOptions
Set StudyDoc = Synergy.StudyDoc()
StudyDoc.MeshNow True
Best Regards,
Shige
