Remake some curves

1 files changed, 4 insertions, 4 deletions

diff --git a/src/Specific/solinas64_2e413m21/CurveParameters.v b/src/Specific/solinas64_2e413m21/CurveParameters.v
index dcb5b3771..c9754833e 100644
--- a/src/Specific/solinas64_2e413m21/CurveParameters.v
+++ b/src/Specific/solinas64_2e413m21/CurveParameters.v
@@ -3,17 +3,17 @@ Require Import Crypto.Util.LetIn.
 
 (***
 Modulus : 2^413 - 21
-Base: 29
+Base: 59
 ***)
 
 Definition curve : CurveParameters :=
   {|
-    sz := 14%nat;
-    base := 29;
+    sz := 7%nat;
+    base := 59;
     bitwidth := 64;
     s := 2^413;
     c := [(1, 21)];
-    carry_chains := Some [seq 0 (pred 14); [0; 1]]%nat;
+    carry_chains := Some [seq 0 (pred 7); [0; 1]]%nat;
 
     a24 := None;
     coef_div_modulus := Some 2%nat;