tests/bugs/vis/bug21757_2

   1 puts "============"
   2 puts "OCC21757"
   3 puts "============"
   4 puts ""
   5 #######################################################################
   6 # Funny (giraffe-like) shading of torus meshed with specific parameters (WNT)
   7 #######################################################################
   8
   9 set BugNumber OCC21757
  10
  11 vinit
  12 vsetdispmode 1
  13 vclear
  14
  15 # variant 2: alternative implicit method of setting deflection
  16 plane pl2 0 0 200 0 0 1
  17 ptorus result pl2 200 50 45
  18 vdisplay result
  19 vsetshading result 0.0004
  20 vfit
  21 checkcolor 200 200 0.89 0.63 0.109
  22
  23 checkview -screenshot -3d -path ${imagedir}/${test_image}.png