e25185ff |
1 | puts "========" |
2 | puts "OCC29400" |
3 | puts "========" |
4 | puts "" |
5 | ################################################# |
6 | # Fuse of two edges creates self-interfered shape |
7 | ################################################# |
8 | |
9 | restore [locate_data_file bug29400_edges.brep] le |
10 | bclearobjects |
11 | bcleartools |
12 | baddcompound le |
13 | bfillds |
14 | bbuild result |
15 | |
16 | checkshape result |
17 | checknbshapes result -vertex 3 -edge 2 |
18 | checkprops result -l 1.78839 |
19 | if {![regexp "OK" [bopcheck result]]} { |
20 | puts "Error: the result is self-interfered" |
21 | } |