tests/bugs/modalg_1/bug118

   1 puts "========"
   2 puts "OCC118"
   3 puts "========"
   4 ########################################################
   5 ## The Cone part of final fuse shape becomes invisible
   6 ########################################################
   7
   8 restore [locate_data_file OCC118-1.brep] a
   9 checkshape a
  10 restore [locate_data_file OCC118-2.brep] b
  11 checkshape b
  12
  13 bop a b
  14 bopfuse result a b
  15
  16 checkprops result -s 4844.63
  17 checkshape result
  18 checkview -display result -2d -path ${imagedir}/${test_image}.png