0031587: Modeling Data - add BRepTools::RemoveInternals() removing internal sub-shape...
[occt.git] / tests / bugs / moddata_3 / bug31587_1
1 puts "================"
2 puts "0031587: Modeling Data - Remove internal sub-shapes from the shape"
3 puts "================"
4 puts ""
5
6 box b 10 10 10
7 box b1 2 2 2 3 2 1
8 explode b1 f
9
10 bclearobjects
11 bcleartools
12 baddobjects b
13 baddtools b1_1
14 eval baddtools [explode b1_2 e]
15 bfillds
16 bsplit r
17
18 removeinternals r
19
20 checkshape r
21 checknbshapes r -vertex 8 -edge 12 -wire 6 -face 6 -shell 1 -solid 1