puts "============"
puts "OCC23123"
puts "============"
puts ""
#######################################################################
# Bug/Regression in visualization of XDE documents in shaded mode
#######################################################################

set BugNumber OCC23123

catch { pload XDE }

ReadStep D [locate_data_file OCC23123-test.step]
XShow D
vfit
vsetdispmode 1

puts "Point color test:"
set x1 310
set y1 225
set r1 0.04
set g1 0.04
set b1 0.67

checkcolor $x1 $y1 $r1 $g1 $b1

checkview -screenshot -3d -path ${imagedir}/${test_image}.png