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