puts "============"
puts "OCC7626"
puts "============"
puts ""
######################################################
# Bad result of bcut operation
######################################################

set BugNumber OCC7626

psphere s 10
box b 10 0 0 20 20 20
trotate b 10 0 0 0 0 1 45

bcommon result s b

checkprops result -s 199.095 
checkshape result

checknbshapes result -vertex 2 -edge 3 -wire 3 -face 3 -shell 1 -solid 1 -compsolid 0 -compound 1 -shape 14
checkview -display result -2d -path ${imagedir}/${test_image}.png