0031587: Modeling Data - add BRepTools::RemoveInternals() removing internal sub-shape...
[occt.git] / tests / bugs / moddata_3 / bug31587_6
CommitLineData
09543c2d 1puts "================"
2puts "0031587: Modeling Data - Remove internal sub-shapes from the shape"
3puts "================"
4puts ""
5
6box b 10 10 10
7polyline e1 2 2 0 8 2 0
8polyline e2 3 2 -5 3 2 0
9
10bclearobjects
11bcleartools
12baddobjects b
13baddtools e1 e2
14bfillds
15bsplit r
16
17compound r e2 c
18
19# topological connectivity is broken without force flag set to true
20removeinternals c
21
22checkshape c
23checknbshapes c -vertex 10 -edge 13 -wire 7 -face 6 -shell 1 -solid 1