tests/bugs/step/bug5027_2

   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.stp]
  12 if [catch { stepread $filepath a * } res] {
  13    puts "Error ${BugNumber} : here is reading problem"
  14 } else {
  15     tpcompound result
  16
  17     set square 159588
  18     set nb_v_good 44
  19     set nb_e_good 72
  20     set nb_w_good 36
  21     set nb_f_good 31
  22     set nb_sh_good 1
  23     set nb_sol_good 1
  24     set nb_compsol_good 0
  25     set nb_compound_good 1
  26     set nb_shape_good 186
  27 }
  28
  29 set 2dviewer 0