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 | polyline e1 2 2 0 8 2 0 |
8 | polyline e2 3 2 -5 3 2 0 |
9 | |
10 | bclearobjects |
11 | bcleartools |
12 | baddobjects b |
13 | baddtools e1 e2 |
14 | bfillds |
15 | bsplit r |
16 | |
17 | compound r e2 c |
18 | |
19 | # topological connectivity is broken without force flag set to true |
20 | removeinternals c |
21 | |
22 | checkshape c |
23 | checknbshapes c -vertex 10 -edge 13 -wire 7 -face 6 -shell 1 -solid 1 |