puts "============"
puts "OCC23214"
puts "============"
puts ""
#######################################################################
# BOP section operation produces incorrect result.
#######################################################################

restore [locate_data_file OCC23214-face_1188.brep] b1
restore [locate_data_file OCC23214-shell_for_line_1188.brep] b2

bop b1 b2
bopsection result

set length 2.94086
set nb_good_vertex 4
set nb_good_edge 2
set nb_good_wire 0
set nb_good_face 0
set nb_good_shell 0
set nb_good_solid 0
set nb_good_compsolid 0
set nb_good_compound 1
set nb_good_shape 7

set 2dviewer 0