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 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 |