tests/bugs/modalg_2/bug5157_2

   1 puts "============"
   2 puts "OCC5157"
   3 puts "============"
   4 puts ""
   5 ######################################################
   6 # DRAW commands vprops and sprops with tolerance 1.e-6 hange on attached shape.
   7 ######################################################
   8
   9 cpulimit 3500
  10 #dchrono h reset; dchrono h start
  11
  12 catch { pload XDE }
  13
  14 set BugNumber OCC5157
  15
  16 set filepath [locate_data_file OCC5157.stp]
  17 if { [catch { stepread $filepath a * } catch_result] } {
  18     puts "Faulty ${BugNumber} : here is reading problem"
  19 } else {
  20     tpcompound result
  21 }
  22 set tol_square 1.e-6
  23 set square 35362.3
  24 set 2dviewer 0
  25