tests/bugs/modalg_4/bug772

   1 puts "========"
   2 puts "OCC772"
   3 puts "SAM1643"
   4 puts "========"
   5 puts ""
   6 ######################################
   7 ## Impossible to make a common of the shapes attached.
   8 ######################################
   9
  10 restore [locate_data_file OCC772_fix.brep] a
  11 explode a
  12 checkshape a_1
  13 checkshape a_2
  14
  15 bcommon result a_1 a_2
  16
  17 checkprops result -s 10190.7
  18 checkshape result
  19 checkview -display result -2d -path ${imagedir}/${test_image}.png