tests/bugs/xde/bug2

   1 puts "================"
   2 puts "OCC2"
   3 puts "================"
   4 puts ""
   5
   6 restore [locate_data_file OCC46.brep] result
   7 puts [checkshape result]
   8
   9 set l [lindex [statshape result] 5]
  10
  11 if { $l != "EDGE"} then {
  12    puts "Error : Output of statshape is incorrect."
  13 }
  14
  15 set 2dviewer 0
  16