tests/bugs/moddata_2/bug360

   1 puts "========================"
   2 puts " BUC60980 "
   3 puts " OCC360"
   4 puts "========================"
   5 puts ""
   6 ##################################################################
   7 ## Can not find a projection the circle on the sphere.
   8 ##################################################################
   9
  10 restore [locate_data_file OCC360a.draw] c
  11 restore [locate_data_file OCC360b.draw] cf
  12
  13 set che [project result c cf]
  14 puts $che
  15
  16 if { [regexp {Projection} $che] && [regexp {Failed} $che] } {
  17     puts "Faulty  OCC360: command PROJECT works wrongly"
  18 } else {
  19     puts " OCC360 OK : command PROJECT works properly"
  20 }
  21
  22 checkview -display result -2d -path ${imagedir}/${test_image}.png
  23
  24