tests/bugs/modalg_4/bug6289

   1 #INTERFACE STEP
   2 puts "============"
   3 puts "OCC6289"
   4 puts "============"
   5 puts ""
   6 ######################################################
   7 # Internal error (code 101) in Section computation
   8 ######################################################
   9
  10 catch { pload XDE }
  11
  12 set BugNumber OCC6289
  13
  14 set filepath [locate_data_file OCC6289.stp]
  15 if { [catch { stepread $filepath a * } catch_result] } {
  16     puts "Faulty ${BugNumber} : here is reading problem"
  17 } else {
  18     tpcompound comp
  19
  20     plane pl 0 0 28 0 0 1
  21     mkface f pl
  22
  23     if { [catch { bsection result comp f } catch_result] } {
  24         puts "Faulty ${BugNumber}"
  25     }
  26 }
  27
  28 checkprops result -l 453.679
  29 checkshape result
  30 checksection result
  31 checkview -display result -3d -path ${imagedir}/${test_image}.png
  32