puts "========================"
puts "BUC61058"
puts " OCC378 "
puts "========================"
puts ""
########################################################################
##Regression on KAS:dev:ros. Draw hangs after try to load 6381.brep  shape to 3D Viewer. Case : cgg/004/S2
########################################################################

restore [locate_data_file OCC378.brep] result

tclean result
vinit

if [catch {vdisplay result } res] {
   puts "Error : function VDISPLAY works wrongly"
}

vfit

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


