5 #######################################################################
6 # Draw command incmesh should support all parameters used in BRepMesh
7 #######################################################################
12 incmesh aCone 0.01 -a 10.
13 set bug_info [trinfo aCone]
14 set NbTrian_1 [lindex $bug_info 3]
15 set NbNodes_1 [lindex $bug_info 5]
18 incmesh aCone 0.01 -a 1.
19 set bug_info [trinfo aCone]
20 set NbTrian_2 [lindex $bug_info 3]
21 set NbNodes_2 [lindex $bug_info 5]
23 if {$NbTrian_1 == $NbTrian_2} {
24 puts "ERROR: OCC25445 is not fixed. Number of triangles are equal for both meshes."
26 if {$NbNodes_1 == $NbNodes_2} {
27 puts "ERROR: OCC25445 is not fixed. Number of nodes are equal for both meshes."