tests/bugs/iges/bug5027_1

   1 puts "============"
   2 puts "OCC5027"
   3 puts "============"
   4 puts ""
   5 ######################################################
   6 # Incorrect result translating wire with loops from STEP
   7 ######################################################
   8
   9 set BugNumber OCC5027
  10
  11 set filepath [locate_data_file OCC5027.igs]
  12 if [catch { igesread $filepath a * } res] {
  13     puts "Error ${BugNumber} : here is reading problem"
  14 } else {
  15     tpcompound result
  16     checkshape result
  17     checkprops result -s 159588
  18     checknbshapes result -vertex 140 -edge 144 -wire 36 -face 31 -shell 0 -solid 0 -compsolid 0 -compound 1 -shape 352
  19     checkview -display result -2d -path ${imagedir}/${test_image}.png
  20 }
  21
  22