0029768: Visualization, TKOpenGl - structure is entirely clipped by suppressed clipping
[occt.git] / tests / bugs / vis / ger61351_2
CommitLineData
352ffd73 1puts "==============="
2puts " GER61351 "
3puts " CASE 2 "
4puts "==============="
5puts ""
6puts "=================================="
7puts "It takes visual check for this BUG"
8puts "=================================="
9
10vinit
11
12GER61351 0 255 0
352ffd73 13
14set x_coord 200
15set y_coord 200
16
ccadc126 17#checkcolor $x_coord $y_coord 0 1 0
18if {"[vreadpixel $x_coord $y_coord rgb name]" != "GREEN"} {
352ffd73 19 puts "Error : Background color is NOT 0 1 0."
20}
21
5747059b 22checkview -screenshot -3d -path ${imagedir}/${test_image}.png