0025113: Mesh - Progress indication and user break functionality for BRepMesh component
[occt.git] / tests / perf / mesh / bug27119
1 puts "========"
2 puts "OCC27119"
3 puts "========"
4 puts ""
5 ###########################################
6 ## Regression: Draw command "incmesh" hangs on the attacheced face.
7 ###########################################
8
9 set BugNumber OCC27119
10
11 restore [locate_data_file bug27119_GrossPlatePart3Step2TransformedFace.brep] result
12
13 dchrono t restart
14 incmesh result 1.e-5
15 dchrono t stop counter incmesh
16
17 set tri 0
18 set nod 0
19 set def 0
20
21 set tri_info [trinfo result]
22 regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri
23 regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod
24 regexp { deflection +([-0-9.+eE]+)} $tri_info full def
25
26 set ref_tri 7857
27 set ref_nod 7859
28 set ref_def 1e-5
29 set tol_rel 0.01
30
31 # Computes deviation of the value from specified one
32 checkreal "Nb of triangles" $tri $ref_tri 0 $tol_rel
33 checkreal "Nb of nodes" $nod $ref_nod 0 $tol_rel
34 checkreal "Deflection" $def $ref_def 1.e-12 0
35
36 set 3dviewer 1