puts "============"
puts "OCC25354"
puts "============"
puts ""
#######################################################################
# Intersection operation
#######################################################################

# Case 13

restore [locate_data_file bug25354_f1.brep] b1

tcopy b1 b2
ttranslate b2 4 10 0

bop b1 b2
bopsection result

checkprops result -l 6 
checkshape result 
checksection result

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