tests/v3d/bugs/bug22900

   1 puts "================"
   2 puts "OCC22900: Problem with shape displaying in shading mode"
   3 puts "================"
   4 puts ""
   5
   6 pload MODELING VISUALIZATION
   7 vertex v1 0 0 0
   8 vertex v2 0 0 30
   9 edge e1 v1 v2
  10 pcone con1 5 0 10
  11 ttranslate con1 0 0 30
  12 compound con1 e1 c1
  13 don c1
  14 fit
  15 vinit View1
  16 vdisplay c1
  17 vfit
  18 vsetcolor c1 RED
  19 vsetcolor c1 GREEN
  20 vsetdispmode 1
  21 vsetcolor c1 RED
  22
  23 checkcolor 204 202 1 0 0
  24
  25 vdump $imagedir/${casename}.png