restore [locate_data_file OCC117.brep] sh
explode sh

bop  sh_2 sh_1
bopcut result

set square 59662.4