tests/bugs/moddata_2/bug8

   1 puts "================"
   2 puts "OCC8"
   3 puts "================"
   4 puts ""
   5 ###################################################
   6 ## BRepTools_WireExplorere gives not all edges from a wire
   7 ###################################################
   8
   9 pload XDE
  10 restore [locate_data_file OCC8.brep] result
  11
  12 checkshape result
  13
  14 explode result w
  15 set info [expwire result_1 sh]
  16
  17 if { [regexp "BRepTools_WireExplorer donne 16 Edges" $info] != 1 } {
  18    puts "Error : BRepTools_WireExplorer gives WRONG number of edges."
  19 }
  20
  21 set 2dviewer 0
  22