tests/bugs/modalg_7/bug31407_1

   1 puts "========"
   2 puts "0031407: Extrema does not process parallel circles correctly"
   3 puts "========"
   4 puts ""
   5
   6 circle c1  0 0 0  0 0 1  5
   7 circle c2  0 0 0  0 0 1  10
   8
   9 if { [regexp "Infinite number of extremas" [extrema c1 c2]] == 1} {
  10   puts "OK : Circles are treated as concentric"
  11 } else {
  12   puts "Error : Extrema does not find the circles are parallel"
  13 }