improve bounds

Author: oscardssmith

src/Primes.jl

@@ -536,8 +536,8 @@ function lenstrafactor(n::T) where{T<:Integer}
     # https://www.rieselprime.de/ziki/Elliptic_curve_method
     B1s = Int[2e3, 11e3, 5e4, 25e4, 1e6, 3e6, 11e6,
                 43e6, 11e7, 26e7, 85e7, 29e8, 76e8, 25e9]
-    runs = (74, 221, 453, 984, 2541, 4949, 8266, 20158,
-              47173, 77666, 42057, 69471, 102212, 188056, 265557)
+    runs = Int[25, 90, 300, 700, 1800, 5100, 1800, 10600,
+              19300, 49000, 124000, 210000, 340000, 10^6, 10^7]
     for (B1, run) in zip(B1s, runs)
         small_primes = primes(B1)
         for a in -run:run