puts "============"
puts "OCC25819"
puts "============"
puts ""
######################################################
# Bad result of BOP cut on valid shapes
######################################################

restore [locate_data_file bug25819_1_BodyA.brep] a
restore [locate_data_file bug25819_1_BodyB.brep] b

bcut result a b

set square 379421

checknbshapes result -vertex 20 -edge 30 -wire 12 -face 11 -shell 1 -solid 1 -compsolid 0 -compound 1 -shape 76 -t -m "Result of BOP cut"

set 2dviewer 1