0023749: Tests cases boolean bsection M9 N4 work incorrect with new Boolean Operation...
[occt.git] / tests / boolean / bsection / M9
1 #puts "TODO #23749 ALL: Exception"
2 #puts "TODO #23749 ALL: An exception was caught"
3 #puts "TODO #23749 ALL: TEST INCOMPLETE"
4
5 restore [locate_data_file lh3d_px1.brep] a
6
7 #removing intersection of faces a_3 and a_220
8
9 set faces [explode a f]
10 bop a_3 a_220
11 bopcut a_3
12 compound b
13 foreach f $faces {
14   compound b $f b
15 }
16
17 set i 0
18 compound result
19
20 repeat 21 {
21   plane p_$i 0 $i*100 0  0 1 0
22   mkface f_$i p_$i
23   bsection s_$i b f_$i
24   compound result s_$i result
25   set dist [expr $i * 100]
26   puts "OK Section:$dist"
27   incr i 10
28 }
29
30 set length 2.49755e+06