tests/bugs/vis/bug23120

   1 puts "============"
   2 puts "OCC23120"
   3 puts "============"
   4 puts ""
   5 ###########################################################################
   6 # Transform persistence is not restored
   7 ###########################################################################
   8
   9 box b1 10 20 30
  10 box b2 10 20 30
  11 ttranslate b2 50 50 0
  12 vinit
  13 vdisplay b1 -trihedron center
  14
  15 vdisplay b2
  16 vfit
  17 vsetdispmode 1
  18 vzoom 0.5
  19 vpan 100 0
  20
  21 set x_coord 300
  22 set y_coord 130
  23
  24 checkcolor $x_coord $y_coord 0.78 0.55 0.9
  25
  26 if { $stat != 1 } {
  27     puts "Error : Transform persistence is not restored"
  28 }
  29
  30 checkview -screenshot -3d -path ${imagedir}/${test_image}.png