tests/bugs/modalg_6/bug26201

   1 puts "========"
   2 puts "OCC26201"
   3 puts "========"
   4 puts ""
   5 #############################################################################
   6 # Wrong processing of dissymetric chamfer: order of chords unjustly changes
   7 #############################################################################
   8
   9 smallview
  10 restore [locate_data_file OCC26201_m.brep] m
  11 copy m m_f
  12 copy m m_e
  13 explode m_f f
  14 explode m_e e
  15 copy m_e_47 e
  16 copy m_f_7 f
  17 donly m f e
  18 chamf r m e f 0.02 0.01
  19 explode r v
  20 explode m v
  21 donly r_19 m_41
  22 fit
  23 donly m r r_19 m_41
  24 distmini dd r_19 m_41
  25 set bug_info [dump dd_val]
  26 if {[lindex $bug_info 5] > 0.01} {
  27   puts "ERROR: OCC26201 is reproduced. Minimum distance is too large."
  28 }
  29 checkview -screenshot -2d -path ${imagedir}/${test_image}.png