0027126: Create command checktrinfo to verify meshes

[occt.git] / tests / bugs / vis / bug288_1

diff --git a/tests/bugs/vis/bug288_1 b/tests/bugs/vis/bug288_1
index 3b4153c..59ca1ea 100755 (executable)
--- a/tests/bugs/vis/bug288_1
+++ b/tests/bugs/vis/bug288_1
@@ -14,18 +14,5 @@ isos result 0
 triangles result
 vfit
 
-set tri 0
-set nod 0
-set info [trinfo result]
-regexp { +([-0-9.+eE]+) +triangles} $info full tri
-regexp { +([-0-9.+eE]+) +nodes} $info full nod
-puts [format " tri= %s  nod= %s " $tri $nod]
-
-if { $tri != 5148 && $nod != 3042} {
-   puts " Warning:  OCC288 (case 1)  looks like OK, but visual checking is required!!"
-} else {
-   puts " OCC288 (case 1) : Faulty"
-}
-
+checktrinfo result -tri !5148 -nod !3042
 checkview -screenshot -3d -path ${imagedir}/${test_image}.png
-