0024968: Impove BRepMesh_Classifier to cope with intersection of huge number of wires
[occt.git] / tests / bugs / mesh / bug24968_2
1 puts "=========="
2 puts "OCC24968"
3 puts "=========="
4 puts ""
5 #####################################
6 # Impove BRepMesh_Classifier to cope with intersection of huge number of wires
7 #####################################
8
9 restore [locate_data_file bug24968_Shape_1.brep] result
10
11 tclean result
12 dchrono h reset
13 dchrono h start
14 incmesh result 0.1 1
15 dchrono h stop
16
17 set info [dchrono h show]
18 regexp {CPU user time: ([-0-9.+eE]+) seconds} ${info} full cpu_time
19
20 if { [regexp {Debug mode} [dversion]] } {
21   if { [regexp {Windows} [dversion]] } {
22     set max_time 100
23   } else {
24     set max_time 250
25   }
26 } else {
27   if { [regexp {Windows} [dversion]] } {
28     set max_time 100
29   } else {
30     set max_time 250
31   }
32 }
33
34 if { ${cpu_time} > ${max_time} } {
35     puts "Error : meshing is slow"
36 } else {
37     puts "OK: meshing is quite fast"
38 }
39
40 vinit
41 vdisplay result
42 vfit
43 vsetdispmode 1
44
45 set only_screen 1