0023087: Upgrade of the OCCT test system
[occt.git] / tests / boolean / bsection / N4
CommitLineData
40093367 1cpulimit 1000
2
3restore lh3d_px2.brep a
4compound result
5set i 1
6repeat 199 {
7 plane p_$i 0 $i*100 0 0 1 0
8 mkface f_$i p_$i
9 bsection s_$i a f_$i -2d -a
10 compound result s_$i result
11 set dist [expr $i * 100]
12 puts "OK Section:$dist"
13 incr i
14}
15
16set length 2.7724e+07