tests/v3d/bugs/bug185

   1 puts "========"
   2 puts "OCC185"
   3 puts "========"
   4
   5 pload XDE MODELING VISUALIZATION
   6
   7 igesbrep [locate_data_file OCC185.igs] a *
   8
   9 tpcompound result
  10 tclean result
  11
  12 vinit View1
  13 vdisplay result
  14 vfit
  15 vsetdispmode result 1
  16
  17 checkcolor 235 214 0.78 0.55 0.9
  18 if { $stat != 1 } { puts "Error : Shading is OFF, but should be ON" }
  19
  20 vsetdispmode result 0
  21 checkcolor 235 214 0 1 0
  22 if { $stat != 1 } { puts "Error : Shading is ON, but should be OFF" }
  23
  24 vdump $imagedir/${casename}.png