0026106: BRepMesh - revision of data model
[occt.git] / tests / bugs / mesh / bug28247
1 puts "========="
2 puts "OCC28247"
3 puts "========="
4 puts ""
5 ################################################################################
6 # Effect of minSize parameter of BRepMesh_IncrementalMesh seems to be too strong
7 ################################################################################
8
9 restore [locate_data_file bug28247_face.brep] f
10 whatis f
11 tolerance f
12
13 vinit
14 vsetdispmode 1
15 vdisplay f
16 vfit
17
18 tclean f
19 incmesh f 0.59
20 trinfo f
21 vdisplay f
22 vfit
23 checkview -screenshot -3d -path ${imagedir}/${test_image}-1.png
24
25 tclean f
26 incmesh f 0.59 -a 11.45
27 set tri_info_1 [trinfo f]
28 regexp { +([-0-9.+eE]+) +triangles} $tri_info_1 full tri_1
29 regexp { +([-0-9.+eE]+) +nodes} $tri_info_1 full nod_1
30 vdisplay f
31 vfit
32 checkview -screenshot -3d -path ${imagedir}/${test_image}-2.png
33
34 tclean f
35 incmesh f 0.59 -a 11.45 -min 0.035
36 set tri_info_2 [trinfo f]
37 regexp { +([-0-9.+eE]+) +triangles} $tri_info_2 full tri_2
38 regexp { +([-0-9.+eE]+) +nodes} $tri_info_2 full nod_2
39 vdisplay f
40 vfit
41 checkview -screenshot -3d -path ${imagedir}/${test_image}-3.png
42
43 if { ${tri_1} > ${tri_2} } {
44    puts "Error: Effect of minSize parameter of BRepMesh_IncrementalMesh seems to be too strong"
45 }