tests/bugs/modalg_2/bug240_2

   1 puts "TODO OCC12345 ALL: Error :  is WRONG because number of"
   2 puts "TODO OCC12345 ALL: Error : The length of result shape is"
   3
   4 puts "========================"
   5 puts " OCC240 "
   6 puts "========================"
   7
   8 #################################################
   9 ## puts "  BOPTUC      case_2_shell.brep and case_2_edge2.brep"
  10 #################################################
  11  puts " "
  12 restore [locate_data_file OCC240a.brep] a
  13 restore [locate_data_file case_2_edge2.brep] b
  14 puts [bop a b]
  15 puts [boptuc result]
  16
  17 checknbshapes result -vertex 14 -edge 7
  18 checkprops result -l 0
  19 checkshape result
  20 checksection result
  21 checkview -display result -2d -path ${imagedir}/${test_image}.png
  22