2 puts "0025822: Visualization, TKOpenGl - front material should be used instead of back material within distinguish mode turned off"
5 pload MODELING OCAF XDE
10 NewDocument D MDTV-XCAF
17 vviewparams -proj 1 0.1 0.1
21 catch { vclipplane delete pln }
23 vclipplane set pln view Driver1/Document_D/View1
24 vclipplane change pln equation -1 0 0 5
26 # FFP on, pixel is RED3, which is expected
28 set aColorFfp [vreadpixel 200 200 rgb name]
29 if { "$aColorFfp" != "RED3" } {
30 puts "Error: RED3 color is expected at the back side (FFP)"
33 # GLSL on, pixel should has the same color RED3, but actual color is KHAKI1
35 set aColorGlsl [vreadpixel 200 200 rgb name]
36 if { "$aColorGlsl" != "RED3" } {
37 puts "Error: RED3 color is expected at the back side (GLSL)"