0025937: Failed Cut Edge or Face by HalfSpace.
[occt.git] / tests / bugs / modalg_6 / bug25937_1
CommitLineData
f47b8d2b 1puts "============"
2puts "OCC25937"
3puts "============"
4puts ""
5###############################
6## Failed Cut Edge or Face by HalfSpace.
7###############################
8
9# Cut a wire by halfspace
10plane h 0 0 0 1 0 0
11mkface h h
12halfspace h h 10 0 0
13polyline a -10 -10 0 10 -10 0 10 10 0 -10 10 0 -10 -10 0
14
15bop a h
16bopcut result
17
18set length 40.
19
20set nbshapes_expected "
21Number of shapes in shape
22 VERTEX : 4
23 EDGE : 3
24 WIRE : 1
25 FACE : 0
26 SHELL : 0
27 SOLID : 0
28 COMPSOLID : 0
29 COMPOUND : 1
30 SHAPE : 9
31"
32checknbshapes result -ref ${nbshapes_expected} -t -m "Result obtained by Cut a wire by halfspace"
33
34set 3dviewer 1