3 puts "Check that the discretization of the sub-shape is identical in shaded and wireframe modes"
4 puts "if the whole shape was already displayed"
8 set aSubShapeTriang $imagedir/${casename}_subshape_triangulation.png
9 set aShapeTriang $imagedir/${casename}_shape_triangulation.png
10 set aDiff $imagedir/${casename}_diff.png
15 vinit View1 w=900 h=900
22 vtranslateview 70 20 0
24 vdump $aSubShapeTriang
36 vtranslateview 70 20 0
40 set aDiffRes [diffimage $aSubShapeTriang $aShapeTriang 0.1 0 0 $aDiff]
42 puts "ERROR : Test failed: there is a difference between images. Discretization of the sub-shape in wireframe mode is incorrect"