tests/bugs/vis/bug194_2

   1 puts "========"
   2 puts "OCC194"
   3 puts "(case 2)"
   4 puts "========"
   5 puts ""
   6 ###############################################
   7 ##puts "Creating of 2D Rectangular ROTATED Grid WITHOUT Lines"
   8 ##puts "(visual checking for this case is desirable)"
   9 ###############################################
  10
  11 v2dinit
  12 v2dgrid Rect 500 500 200 200 45 Points
  13
  14 set x_coord 20
  15 set y_coord 21
  16 set color2d 1
  17
  18 checkcolor $x_coord $y_coord 0.7 0.7 0.7
  19
  20 if { $stat != 1 } {
  21     puts "Error : 2D Rectangular ROTATED Grid WITHOUT Lines was NOT CREATED properly"
  22 }
  23
  24 set only_screen2d 1
  25