diff --git a/libraries/base/common/src/vhdl/common_pkg.vhd b/libraries/base/common/src/vhdl/common_pkg.vhd
index 530ec648561940719207aefd953766080524ae1d..55bf1da32ec2cac8f6a1c035ea219a7c4ade3a75 100644
--- a/libraries/base/common/src/vhdl/common_pkg.vhd
+++ b/libraries/base/common/src/vhdl/common_pkg.vhd
@@ -674,7 +674,7 @@ PACKAGE BODY common_pkg IS
   
   FUNCTION almost_equal(a, b, delta : REAL) RETURN BOOLEAN IS
   BEGIN
-    IF ABS(a - b) < ABS(delta) THEN
+    IF ABS(a - b) <= ABS(delta) THEN
       RETURN TRUE;
     ELSE
       RETURN FALSE;
@@ -683,7 +683,7 @@ PACKAGE BODY common_pkg IS
 
   FUNCTION almost_equal(a, b, delta : INTEGER) RETURN BOOLEAN IS
   BEGIN
-    IF ABS(a - b) < ABS(delta) THEN
+    IF ABS(a - b) <= ABS(delta) THEN
       RETURN TRUE;
     ELSE
       RETURN FALSE;