puts "============"
puts "OCC10702"
puts "============"
puts ""
#######################################################################
# MeshVS_NodalColorPrsBuilder does not take into account visibility of mesh elements
#######################################################################

set BugNumber OCC10702

pload XDE

vinit

meshfromstl m [locate_data_file OMF6391_box.stl]

set x_coord 180
set y_coord 260

vsetdispmode m 2
puts "\nMesh displayed in shading mode"

checkcolor $x_coord $y_coord 0 0 0.36

vselmode m 8 1
puts "\nSelection of elements is activated"

vselect $x_coord $y_coord 1
###vselect $x_coord $y_coord 1

meshhidesel m
puts "\nSelected elemement is hidden"

checkcolor $x_coord $y_coord 0 0 0.36

meshcolors m nodal 0
puts "\nDisplay nodal color presentation"

#checkcolor $x_coord $y_coord 0.46 0.12 0.37
checkcolor $x_coord $y_coord 0.72 0.72 0.70

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