tests/bugs/xde/bug22805

   1 puts "================"
   2 puts "OCC22805"
   3 puts "================"
   4 puts ""
   5 ######################################################################################
   6 # Bug of STEP read/write
   7 ######################################################################################
   8
   9 set BugNumber OCC22805
  10
  11 restore [locate_data_file OCC22805-spiral_solid.brep] s
  12 stepwrite 0 s $imagedir/${test_image}.stp
  13 stepread $imagedir/${test_image}.stp result *
  14 set info [checkshape result_1]
  15
  16 if { [regexp {This shape seems to be valid} $info]} {
  17    puts "OK ${BugNumber}"
  18 } else {
  19    puts "Faulty ${BugNumber}"
  20 }
  21
  22 renamevar result_1 result
  23 set square 15121.2
  24 set 3dviewer 0
  25