0023371: Expression which check of change of square/volume/length in end files doesn...

[occt.git] / tests / mkface / end

diff --git a/tests/mkface/end b/tests/mkface/end
index 0406ba0..1b9c663 100755 (executable)
--- a/tests/mkface/end
+++ b/tests/mkface/end
@@ -11,7 +11,7 @@ if { [isdraw result] } {
    regexp { *VERTEX +: +MAX=([-0-9.+eE]+)} $tolerance full maxv 
 
    if { [info exists MaxFTol ] } {
-      if { $MaxFTol != 0 && $maxf > $MaxFTol && [expr abs($MaxFTol - $maxf)/$MaxFTol] > 0.01 } {
+      if { $MaxFTol != 0 && $maxf > $MaxFTol && [expr 1.*abs($MaxFTol - $maxf)/$MaxFTol] > 0.01 } {
          puts "Error : Result shape is WRONG. MAX tolerance of FACE should be equal $MaxFTol instead of $maxf"
       } elseif { $MaxFTol == 0 && $maxf != 0 } {
          puts "Error : Result shape is WRONG."
@@ -21,7 +21,7 @@ if { [isdraw result] } {
    } 
 
    if { [info exists MaxETol ] } {
-      if { $MaxETol != 0 && $maxe > $MaxETol && [expr abs($MaxETol - $maxe)/$MaxETol] > 0.01 } {
+      if { $MaxETol != 0 && $maxe > $MaxETol && [expr 1.*abs($MaxETol - $maxe)/$MaxETol] > 0.01 } {
          puts "Error : Result shape is WRONG. MAX tolerance of EDGE should be equal $MaxETol instead of $maxe"
       } elseif { $MaxETol == 0 && $maxe != 0 } {
          puts "Error : Result shape is WRONG."
@@ -31,7 +31,7 @@ if { [isdraw result] } {
    } 
 
    if { [info exists MaxVTol ] } {
-      if { $MaxVTol != 0 && $maxv > $MaxVTol && [expr abs($MaxVTol - $maxv)/$MaxVTol] > 0.01 } {
+      if { $MaxVTol != 0 && $maxv > $MaxVTol && [expr 1.*abs($MaxVTol - $maxv)/$MaxVTol] > 0.01 } {
          puts "Error : Result shape is WRONG. MAX tolerance of VERTEX should be equal $MaxVTol instead of $maxv"
       } elseif { $MaxVTol == 0 && $maxv != 0 } {
          puts "Error : Result shape is WRONG."