Modified test case for issue 23753
[occt.git] / tests / bugs / modalg_1 / bug19793_2
CommitLineData
00302ba4 1puts "TODO ?OCC24472 ALL: Error : Result shape is WRONG because it must contains 70 edges instead of 71"
2puts "TODO ?OCC24472 ALL: Error : Result shape is WRONG because it must contains 139 shapes instead of 140"
1e07a0fa 3puts "TODO ?OCC23753 ALL: ERROR: OCC23753 is reproduced."
5291af9f 4puts "TODO ?OCC23753 ALL: Process killed by CPU limit"
5puts "TODO ?OCC23753 ALL: TEST INCOMPLETE"
8db070a5 6
3bea4c16 7puts "============"
8puts "OCC19793"
9puts "============"
10puts ""
11#######################################################################
12# Fuse problem of symetrical shapes. Appendix for NPAL19789
13#######################################################################
14
5291af9f 15cpulimit 1000
3bea4c16 16set BugNumber OCC19793
17
18puts "Load first shape ..."
19restore [locate_data_file bug19793_new_shape.brep] b1
20puts "Load second shape ..."
21restore [locate_data_file bug19793_shape.brep] b2
22
23puts "Prepare boolean operation ..."
1e07a0fa 24dchrono perf_h reset
25dchrono perf_h start
3bea4c16 26bop b1 b2
1e07a0fa 27dchrono perf_h stop
3bea4c16 28
29puts "Start boolean operation ..."
30bopsection result
31puts "Finish boolean operation ..."
32
33set length 17730.1
34
35set nb_e_good 1190
36set nb_v_good 68
37set nb_e_good 70
38set nb_w_good 0
39set nb_f_good 0
40set nb_sh_good 0
41set nb_sol_good 0
42set nb_compsol_good 0
43set nb_compound_good 1
44set nb_shape_good 139
45
1e07a0fa 46# OCC23753 processing
47# Performance verification of bop operation
48set chrono_info [dchrono perf_h show]
49regexp {CPU user time: ([-0-9.+eE]+) seconds} $chrono_info full CPU_time
50set currentOS $tcl_platform(os)
51if {[string compare $currentOS "Windows NT"] == 0} {
52 puts "Checking WINDOWS performance..."
53 # Initial CPU_time is 92-94 seconds for Windows
54 if {$CPU_time > 60.} {
55 puts "ERROR: OCC23753 is reproduced."
56 puts " Low performance: $CPU_time"
57 }
58}
59if {[string compare $currentOS "Linux"] == 0} {
60 puts "Checking LINUX performance..."
61 # Initial CPU_time is 287-289 seconds for Linux
62 if {$CPU_time > 100.} {
63 puts "ERROR: OCC23753 is reproduced."
64 puts " Low performance: $CPU_time"
65 }
66}
3bea4c16 67
68set 2dviewer 0