vsetdispmode result 1
vfit
-set info [trinfo result]
-regexp { +([-0-9.+eE]+) +triangles} $info full tri
-regexp { +([-0-9.+eE]+) +nod} $info full nod
-
-
-if { $tri != 1655 || $nod != 1143 } {
- puts "Shading problem may be, nb tri & nod were changed"
-}
-
-set 2dviewer 0
+checktrinfo result -tri 244 -nod 237
+checkview -display result -2d -path ${imagedir}/${test_image}.png