puts "========================"
puts " OCC412 "
puts "========================"
puts ""

restore [locate_data_file f2] b1 
checkshape b1

restore [locate_data_file f3] b2
checkshape b2

bcut result b1 b2

checkprops result -s 43.6332 
checkshape result
checkview -display result -2d -path ${imagedir}/${test_image}.png