puts "========"
puts "OCC27878"
puts "========"
puts ""
#################################################
# Development of the Gluing operations based on the new Boolean component
#################################################

# planar boxes shifted x y

restore [locate_data_file bug27878_shapes3.brep] c

# fusing the solids using the glue option
bglue 1
bclearobjects
bcleartools
baddobjects {*}[explode c so]
bfillds -t
bbuild result

checknbshapes result -face 2052 -solid 343
checkprops result -s 2058 -v 343

checkview -display result -2d -path ${imagedir}/${test_image}.png