correction of misprints
[occt.git] / tests / bugs / mesh / bug24968_1
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 cpulimit 2500
10
11 restore [locate_data_file bug24968_Shape_1.brep] result
12
13 tclean result
14 dchrono h reset
15 dchrono h start
16 incmesh result 0.1 0
17 dchrono h stop
18
19 set info [dchrono h show]
20 regexp {CPU user time: ([-0-9.+eE]+) seconds} ${info} full cpu_time
21
22 if { [regexp {Debug mode} [dversion]] } {
23   if { [regexp {Windows} [dversion]] } {
24     set max_time 2500
25   } else {
26     set max_time 2500
27   }
28 } else {
29   if { [regexp {Windows} [dversion]] } {
30     set max_time 100
31   } else {
32     set max_time 250
33   }
34 }
35
36 if { ${cpu_time} > ${max_time} } {
37     puts "Error : meshing is slow"
38 } else {
39     puts "OK: meshing is quite fast"
40 }
41
42 vinit
43 vdisplay result
44 vfit
45 vsetdispmode 1
46
47 set only_screen 1