516ddf204d84c726e422137a624db64fd4cc0ef1
[occt.git] / tests / bugs / mesh / bug23614_3
1 puts "================"
2 puts "CR23614"
3 puts "================"
4 puts ""
5 #####################################################################
6 # BRepMesh creates incorrect triangulation on the attached models
7 #####################################################################
8
9 restore [locate_data_file bug23614_face3.brep] f3
10 tclean f3
11 incmesh f3 0.01
12 set info [trinfo f3]
13 regexp {([0-9]+) triangles} $info full tri
14 regexp {([0-9]+) nodes} $info full nod
15
16 # compare number of triangles
17 if { $tri == 0 } {
18     puts "Error: face contains $tri triangles"
19 } else {
20     puts "OK: face contains $tri triangles"
21 }
22
23 # compare number of nodes
24 if { $nod == 0 } {
25     puts "Error : face contains $nod nodes"
26 } else {
27     puts "OK: face contains $nod nodes"
28 }
29
30 top
31 fit
32 triangles f3
33 checkview -screenshot -2d -path ${imagedir}/${test_image}.png
34
35