puts "============"
puts "OCC23853"
puts "============"
puts ""
######################################################
# BOP regression (2) - BRepAlgoAPI_Cut
######################################################

restore [locate_data_file bug23853_cylinder.brep] s1
restore [locate_data_file bug23853_pipe.brep] s2

bop s1 s2
bopfuse result

checkprops result -s 17766.2 
checkshape result
set 2dviewer 0