puts "========"
puts "OCC118"
puts "========"
########################################################
## The Cone part of final fuse shape becomes invisible
########################################################

restore [locate_data_file OCC118-1.brep] a 
checkshape a
restore [locate_data_file OCC118-2.brep] b
checkshape b

bfuse result a b

set square 4844.63
set 3dviewer 1

