Commit | Line | Data |
---|---|---|
09543c2d | 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 | explode b1 f | |
9 | bclearobjects | |
10 | bcleartools | |
11 | baddobjects b | |
12 | baddtools b1_2 b1_3 | |
13 | eval baddtools [explode b1_1 w] | |
14 | bfillds | |
15 | bsplit r | |
16 | ||
17 | removeinternals r | |
18 | ||
19 | checkshape r | |
20 | checknbshapes r -vertex 8 -edge 12 -wire 6 -face 6 -shell 1 -solid 1 |