tests/bugs/moddata_2/bug703

   1 puts "=========="
   2 puts "OCC703    "
   3 puts "=========="
   4 puts ""
   5 ##################################################
   6 ## Wrong result of extrema
   7 ## Draw command extrema c1 ce gives no solutions, but must be 2 solutions
   8 ##################################################
   9
  10 restore [locate_data_file OCC703_1.draw] c1
  11 restore [locate_data_file OCC703_2.draw] ce
  12
  13 set result [extrema c1 ce]
  14 set err [llength $result]
  15 if { $err != 2} {
  16     puts "Faulty OCC703 (amount of solution): command extrema does NOT work properly"
  17 } else {
  18     puts "OCC703 OK (amount of solution): command extrema works properly"
  19 }
  20
  21 checkview -display result -2d -path ${imagedir}/${test_image}.png
  22