0031587: Modeling Data - add BRepTools::RemoveInternals() removing internal sub-shape...
[occt.git] / tests / bugs / moddata_3 / bug31587_5
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 0 5 5 5
8 box b2 3 2 2 4 5 2
9 explode b1 f
10 explode b2 f
11 bclearobjects
12 bcleartools
13 baddobjects b
14 baddtools b1_2 b1_3
15 eval baddtools [explode b1_1 w]
16 baddtools b2_5 b2_6
17 bfillds
18 bsplit r
19
20 removeinternals r
21
22 checkshape r
23 checknbshapes r -vertex 8 -edge 12 -wire 6 -face 6 -shell 1 -solid 1