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
bopcut result

set square 17590.6
set 2dviewer 0