restore [locate_data_file OCC122.brep] sh
explode sh

bop  sh_1 sh_2
bopcut result

set square 83334.1
