1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
puts "========="
puts "OCC23958"
puts "========="
puts ""
#################################################################################
# Section of shell by plane is incomplete
#################################################################################
cpulimit 4000
pload DATAEXCHANGEKERNEL
# shell
restore [locate_data_file bug23958_bug948-shape.brep] a
# plane
plane p 10.62752 0 0 1 0 0
mkface f p
# check that everything is Ok
checkshape a
tolerance a
bopargcheck a f -S #F
# build section
bsection result a f
# check total length of result
set length 1.21473
set 2dviewer 1
|
