tests/bugs/vis/bug24374

   1 puts "============"
   2 puts "CR24374"
   3 puts "============"
   4 puts ""
   5 #######################################################################
   6 #  Flipping affects highlight presentation of dimension
   7 #######################################################################
   8 pload ALL
   9 pload QAcommands
  10 box b 100 100 100
  11 explode b e
  12 vdisplay b
  13 vdisplay b_9
  14 vdimension length name=dim1 b_9 text=3d plane=zox
  15 vdisplay dim1
  16 vselmode b 2 1
  17 vfit
  18 vmoveto 110 352
  19
  20 set x_coord 161
  21 set y_coord 372
  22 checkcolor $x_coord $y_coord 0 1 1
  23
  24 if { $stat != 1 } {
  25   puts "Error : Highlighting of dimension with flipping in local context failed."
  26 }
  27
  28 set only_screen 1