puts "========"
puts "BUC60956"
puts "OCC112"
puts "========"
puts ""
###############################################################
## When restoring a TopoDS_Shape containing a valid Meshing (computed for display) the
##  meshing is computed again when displaying it. 
###############################################################

set x_coord 140
set y_coord 115

restore [locate_data_file OCC20.brep] result
tclean result
vinit
vdisplay result
vfit
vsetdispmode result 1

checkcolor $x_coord $y_coord 0.77 0.54 0.9

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



