3 puts "Check that the shape is automatic re-triangulated with deflection-check logic"
4 puts "in case of enabled auto triangulation feature (its own triangulation can be lost)."
5 puts "And it keeps its already computed triangulation"
6 puts "in case of disabled auto triangulation feature."
10 set aDefaultShape $imagedir/${casename}_shape.png
11 set aShapeAutoTr $imagedir/${casename}_shape_auto_triangulation.png
12 set aShapeNotAutoTr $imagedir/${casename}_shape_not_auto_triangulation.png
18 vdefaults -autoTriang on
27 set tri_info [trinfo s]
28 regexp { +([-0-9.+eE]+) +triangles} $tri_info full triIncmesh1
31 set tri_info [trinfo s]
32 regexp { +([-0-9.+eE]+) +triangles} $tri_info full triAutoTrShape
37 vdefaults -autoTriang off
40 set tri_info [trinfo s]
41 regexp { +([-0-9.+eE]+) +triangles} $tri_info full triIncmesh2
44 set tri_info [trinfo s]
45 regexp { +([-0-9.+eE]+) +triangles} $tri_info full triNotAutoTrShape
47 vdump $aShapeNotAutoTr
49 if {${triIncmesh1} == ${triAutoTrShape}} {
50 puts "ERROR : Test failed. Incorrect triangulation in case of enabled auto triangulation feature."
52 if {${triIncmesh2} != ${triNotAutoTrShape}} {
53 puts "ERROR : Test failed. Incorrect triangulation in case of disabled auto triangulation feature."