restore OCC123.brep sh
explode sh

bop  sh_1 sh_2
bopcut result

set square 33379.4