tests/bugs/vis/bug22819

   1 puts "============"
   2 puts "OCC22819"
   3 puts "Redesign of OpenGl driver(Tests ColorScale)"
   4 puts "============"
   5 puts ""
   6
   7 set BugNumber OCC22819
   8
   9 plane p 100 100 100 0 0 1 1 0 0
  10 psphere result p 30
  11 vinit View1
  12 vdisplay result
  13 vsetmaterial result SILVER
  14 vsettransparency result 0.6
  15 vcolorscale -demo
  16 vsetdispmode result 1
  17
  18 set square 11309.6
  19 set only_screen 1