0027341: Incorrect exact HLR results
[occt.git] / tests / bugs / modalg_6 / bug27270
1 puts "============"
2 puts "OCC27270"
3 puts "============"
4 puts ""
5 ###########################################################################################################
6 #  Boolean operations: incorrect assembling of sub-shapes in container shapes (wires, shells, compsolids)
7 ###########################################################################################################
8
9 box b1 200 200 200
10 explode b1 w
11 compound b1_1 b1_2 b1_3 b1_4 b1_5 b1_6 c1
12 tcopy c1 c2
13 ttranslate c2 100 0 300
14 bfuse result c1 c2
15 set info [explode result]
16 if { [llength $info] > 2 } {
17   puts "OK: result is correct"
18 } else {
19   puts "Error: incorrect assembling of sub-shapes in container shapes"
20 }
21
22 checkprops result -l 9600
23 checkshape result
24 checkview -display result -3d -path ${imagedir}/${test_image}.png