Mesh settings ignored in TCL script 2D surface meshing
Weltraum
New Altair Community Member
Hello,
I am facing a problem while creating a 2D surface mesh in TCL Code in hypermesh.
The settings done in '*interactiveremeshsurf' and 'set_meshfaceparams' seem to be ignored for all surfaces
and overwritten by the settings written the GUI at 2D-->Automesh-->Edge deviation.
The code can be seen below:
*setedgedensitylinkwithaspectratio -1 *elementorder 2 *startnotehistorystate {Automesh surfaces} *createmark surfaces 1 [lindex $List_OP($i) 0] for { set ii 1} {$ii <=[llength $List_OP($i)-1]} { incr ii} { *appendmark surfaces 1 [lindex $List_OP($i) $ii] } if { 1<=$i && $i<=3 } { # markmask, elementsize, elem_type (0 trias, 3 rtrias) *interactiveremeshsurf 1 0.25 3 3 2 1 0 set i_am 0 foreach Element $List_OP($i) { # index (von 0), elem_type, alg_type, elem_size *set_meshfaceparams $i_am 2 3 3 0 1 0.5 1 0 *automesh $i_am 1 3 incr i_am } *storemeshtodatabase 1 *ameshclearsurface *clearmark surfs 1; *endnotehistorystate {Automesh surfaces}
Am I missing some command?
Thanks and best regards,
Henrik
0
Answers
-
Did someone encounter this problem already and perhabs has a solution?
I would be very thankful for help on this issue. /emoticons/default_biggrin.png' srcset='/emoticons/biggrin@2x.png 2x' title=':D' width='20' />
Best regards,
Henrik
0