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

restore [locate_data_file bug25819_3_BodyA.brep] a
restore [locate_data_file bug25819_3_BodyB.brep] b

bcut result a b

set square 67742.9

checknbshapes result -vertex 99 -edge 136 -wire 49 -face 36 -shell 1 -solid 1 -compsolid 0 -compound 1 -shape 323 -t -m "Result of BOP cut"

set 2dviewer 1
