tests/bugs/vis/bug230_1

   1 puts "========"
   2 puts "OCC230"
   3 puts "OCC489"
   4 puts "========"
   5 puts ""
   6 ############################################
   7 ## Numeric Error occures in V2d_View::WindowFit() , Magnify()
   8 ############################################
   9
  10 point p1 0 10
  11 point p2 10 20
  12
  13 if [catch { OCC230 tc p1 p2 } ] {
  14    puts "OCC230: Error"
  15 } else {
  16    puts "OCC230: OK"
  17 }