tests/bugs/moddata/bug20683

   1 puts "========================"
   2 puts "OCC20683"
   3 puts "Customer : TATA"
   4 puts "========================"
   5 puts ""
   6 #######################################################################
   7 # BRepExtrema_ExtCC produces incomplete result.
   8 #######################################################################
   9
  10 set BugNumber OCC20683
  11
  12 # finite line is used
  13 line ll 6834.93 -4100 500 0 0 1
  14 trim trll ll -1000 -500
  15 mkedge tree trll
  16
  17 restore [locate_data_file OCC20683_circ1.brep] e1
  18 restore [locate_data_file OCC20683_circ2.brep] e2
  19
  20 set res_list [distmini d e1 e2]
  21 set res_length [llength ${res_list}]
  22 puts "res_length = ${res_length}"
  23
  24 # Resume
  25 puts ""
  26 if { ${res_length} != 3 } {
  27    puts "Faulty ${BugNumber}"
  28 } else {
  29    puts "OK ${BugNumber}"
  30 }
  31