From 01f6ed1aafd567672bfb07d98c3bfa2ec19f8b3e Mon Sep 17 00:00:00 2001
From: mdw <mdw>
Date: Wed, 22 Dec 1999 15:55:00 +0000
Subject: [PATCH] Adjust Karatsuba parameters.

---
 mpmont.c | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

diff --git a/mpmont.c b/mpmont.c
index a5b5e66..cabb2cb 100644
--- a/mpmont.c
+++ b/mpmont.c
@@ -1,6 +1,6 @@
 /* -*-c-*-
  *
- * $Id: mpmont.c,v 1.7 1999/12/11 01:51:14 mdw Exp $
+ * $Id: mpmont.c,v 1.8 1999/12/22 15:55:00 mdw Exp $
  *
  * Montgomery reduction
  *
@@ -30,6 +30,9 @@
 /*----- Revision history --------------------------------------------------* 
  *
  * $Log: mpmont.c,v $
+ * Revision 1.8  1999/12/22 15:55:00  mdw
+ * Adjust Karatsuba parameters.
+ *
  * Revision 1.7  1999/12/11 01:51:14  mdw
  * Use a Karatsuba-based reduction for large moduli.
  *
@@ -182,7 +185,7 @@ mp *mpmont_reduce(mpmont *mm, mp *d, mp *a)
 
   /* --- Check for serious Karatsuba reduction --- */
 
-  if (n > KARATSUBA_CUTOFF * 2) {
+  if (n > KARATSUBA_CUTOFF * 3) {
     mp al;
     mpw *vl;
     mp *u;
@@ -265,7 +268,7 @@ mp *mpmont_mul(mpmont *mm, mp *d, mp *a, mp *b)
 
 mp *mpmont_mul(mpmont *mm, mp *d, mp *a, mp *b)
 {
-  if (mm->n > KARATSUBA_CUTOFF * 2) {
+  if (mm->n > KARATSUBA_CUTOFF * 3) {
     d = mp_mul(d, a, b);
     d = mpmont_reduce(mm, d, d);
   } else {
-- 
2.11.0