puts "================"
puts "OCC128"
puts "================"
###############################################################
## The shading is false: objects seem to be situated in front of the others while they are behind.
###############################################################

set x_coord 171
set y_coord 171

vinit
OCC128
vviewparams 4.9487928 89.23589 4.1505 0.7329295 0.59461397 0.33052679 -0.536849 0.2071041 0.81786 71.971878 -17.250309 33.509651

checkcolor $x_coord $y_coord 0.43 0.48 0.54

set only_screen 1
