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