puts "================"
puts "OCC288: Currently meshing (for shading) of some shapes looks incorrect"
puts "================"
puts ""

pload MODELING VISUALIZATION
restore [locate_data_file shading_105.brep] result

checkprops result -l 265.239
checksection result
checknbshapes result -vertex 2 -edge 3 -wire 1 -face 1 -shell 0 -solid 0 -compsolid 0 -compound 0 -shape 7
vinit View1
tclean result
vsetdispmode 1
vdisplay result
vfit

vdump $imagedir/${casename}.png