tests/bugs/modalg/bug240_2

   1 puts "TODO OCC12345 ALL: Error : Result shape is WRONG because it must"
   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  set nb_info [nbshapes result]
  17  set nb_v_good 14
  18  set nb_e_good 7
  19
  20  set length 0
  21  set 2dviewer 0
  22