puts "===========" puts "OCC28036" puts "Visualization, AIS_ColoredShape - handle correctly nested compounds within Shaded display mode" puts "===========" puts "" pload MODELING VISUALIZATION box b1 0 0 0 1 2 3 box b2 0 3 0 2 1 3 box b3 3 0 0 3 2 1 compound b1 b2 c12 compound c12 b3 c vclear vinit View1 vaxo vdisplay -dispMode 1 c vfit vaspects c -setColor BLUE vaspects c -subshapes b1 -setColor RED vaspects c -subshapes c12 -setColor GREEN if { [vreadpixel 100 100 rgb name] != "RED2" } { puts "Error: wrong subshape color" } if { [vreadpixel 200 100 rgb name] != "GREEN2" } { puts "Error: wrong subshape color" } if { [vreadpixel 200 300 rgb name] != "BLUE2" } { puts "Error: wrong subshape color" } vdump $imagedir/${casename}.png