6d49a4937bcaffc074d015b3228dc027328369c4
[occt.git] / tests / boolean / bsection / N7
1 cpulimit 1200
2
3 restore [locate_data_file lh3d_ro1.brep] a
4 isos a 0
5 compound result
6 set i 1
7 repeat 199 {
8 plane p_$i 0 $i*100 0  0 1 0
9 mkface f_$i p_$i
10 bsection s_$i a f_$i
11 compound result s_$i result
12 display s_$i
13 clear f_$i
14 clear p_$i
15 set dist [expr $i * 100]
16 puts "OK Section:$dist"
17 incr i
18 }
19
20 set length 4.36836e+07