tests/bugs/moddata_1/bug22733

   1 puts "========"
   2 puts "OCC22733"
   3 puts "========"
   4 puts ""
   5 ###########################################################
   6 # Empty result for the extrema between a circle and a line
   7 ###########################################################
   8
   9 set BugNumber OCC22733
  10
  11 restore [locate_data_file bug22733_ez4.brep] ez4
  12 restore [locate_data_file bug22733_ez17.brep] ez17
  13
  14 mkcurve c4 ez4
  15 mkcurve c17 ez17
  16
  17 set extrema_res [extrema c4 c17]
  18 set extrema_length [llength ${extrema_res} ]
  19
  20 if {${extrema_length} != 1 } {
  21    puts "${BugNumber}: Faulty"
  22 } else {
  23    puts "${BugNumber}: OK"
  24 }
  25
  26 set 3dviewer 0
  27