tests/bugs/fclasses/bug25757

   1 puts "========"
   2 puts "OCC25757"
   3 puts "========"
   4 puts ""
   5 ##############################################
   6 # distmini returns wrong solution for ellipse/vertex
   7 ##############################################
   8
   9 restore [locate_data_file bug25757_ellipse.brep] ellipse
  10
  11 vertex vertex1 7.32050807568877 3.999999999999999 10.0
  12 vertex vertex2 7.32050807568877 3.99999999999999 10.0
  13
  14 distmini dv1 vertex1 ellipse
  15 set dist1 [dval dv1_val]
  16 puts "vertex1 distance = ${dist1}"
  17
  18 distmini dv2 vertex2 ellipse
  19 set dist2 [dval dv2_val]
  20 puts "vertex2 distance = ${dist2}"
  21
  22 set tol_abs_dist 1.0e-12
  23 set tol_rel_dist 1.0e-2
  24
  25 set expected_dist1 0.0
  26 set expected_dist2 0.0
  27
  28 checkreal "Distance 1" ${dist1} ${expected_dist1} ${tol_abs_dist} ${tol_rel_dist}
  29 checkreal "Distance 2" ${dist2} ${expected_dist2} ${tol_abs_dist} ${tol_rel_dist}