diff --git a/lib/Sidef/Types/Number/Number.pm b/lib/Sidef/Types/Number/Number.pm
index 6bd896a35..9ad2a1061 100644
--- a/lib/Sidef/Types/Number/Number.pm
+++ b/lib/Sidef/Types/Number/Number.pm
@@ -10985,7 +10985,9 @@ package Sidef::Types::Number::Number {
         _primality_pretest($t)
           || return Sidef::Types::Bool::Bool::FALSE;
 
-        (Math::Prime::Util::GMP::is_prob_prime($t) && Math::Prime::Util::GMP::is_strong_pseudoprime($n, 2))
+        (   Math::Prime::Util::GMP::is_strong_pseudoprime($t, 2)
+         && Math::Prime::Util::GMP::is_strong_pseudoprime($n, 2)
+         && Math::Prime::Util::GMP::is_strong_lucas_pseudoprime($t))
           ? Sidef::Types::Bool::Bool::TRUE
           : Sidef::Types::Bool::Bool::FALSE;
     }