Adjusting test unstable testing cases in Debug mode for current state of OCCT
[occt.git] / tests / boolean / bsection / M8
1 #puts "TODO DEBUG_OCC24121 Debian60-64: Process killed by CPU limit"
2 #puts "TODO DEBUG_OCC24121 Debian60-64: TEST INCOMPLETE"
3
4 restore [locate_data_file lh3d_px1.brep] a
5
6 #removing intersection of faces a_3 and a_220
7
8 set faces [explode a f]
9 bop a_3 a_220
10 bopcut a_3
11 compound b
12 foreach f $faces {
13   compound b $f b
14 }
15
16 compound result
17
18 set i -5
19 while {$i < 0} {
20   plane p_$i $i*1000 0 0 1 0 0
21   mkface f_$i p_$i
22   bsection s_$i b f_$i
23   compound result s_$i result
24   set dist [expr $i * 1000]
25   puts "OK Section$i:$dist"
26   incr i
27 }
28
29 incr i 5
30 while {$i <= 30} {
31   plane p_$i $i*1000 0 0 1 0 0
32   mkface f_$i p_$i
33   bsection s_$i b f_$i
34   compound result s_$i result
35   set dist [expr $i * 1000]
36   puts "OK Section$i:$dist"
37   incr i 5
38 }
39 incr i 20
40 while {$i <= 105} {
41   plane p_$i $i*1000 0 0 1 0 0
42   mkface f_$i p_$i
43   bsection s_$i b f_$i
44   compound result s_$i result
45   set dist [expr $i * 1000]
46   puts "OK Section$i:$dist"
47   incr i 5
48 }
49
50 set length 624193