puts "==========="
puts "BUC60532"
puts "==========="

restore [locate_data_file buc60532a.brep] p 
checkshape p

restore [locate_data_file buc60532b.brep] t1
checkshape t1

restore [locate_data_file buc60532c.brep] t2
checkshape t2

# create halfspace
halfspace h1 t1 20 20 0
halfspace h2 t2 20 20 0

# first cut
bcut result p h1

set square 81.8172
set 2dviewer 0
