diff options
Diffstat (limited to 'src/Specific/NISTP256')
-rw-r--r-- | src/Specific/NISTP256/AMD128/CurveParameters.v | 5 | ||||
-rw-r--r-- | src/Specific/NISTP256/AMD128/fenzDisplay.log | 14 | ||||
-rw-r--r-- | src/Specific/NISTP256/AMD64/CurveParameters.v | 5 | ||||
-rw-r--r-- | src/Specific/NISTP256/AMD64/fenzDisplay.log | 14 |
4 files changed, 8 insertions, 30 deletions
diff --git a/src/Specific/NISTP256/AMD128/CurveParameters.v b/src/Specific/NISTP256/AMD128/CurveParameters.v index ba86c9d18..f3c1cc5b1 100644 --- a/src/Specific/NISTP256/AMD128/CurveParameters.v +++ b/src/Specific/NISTP256/AMD128/CurveParameters.v @@ -18,7 +18,7 @@ Definition curve : CurveParameters := a24 := None; coef_div_modulus := None; - goldilocks := Some false; + goldilocks := None; montgomery := true; freeze := Some false; ladderstep := false; @@ -27,7 +27,8 @@ Definition curve : CurveParameters := square_code := None; - upper_bound_of_exponent := None; + upper_bound_of_exponent_loose := None; + upper_bound_of_exponent_tight := None; allowable_bit_widths := None; freeze_extra_allowable_bit_widths := None; modinv_fuel := None diff --git a/src/Specific/NISTP256/AMD128/fenzDisplay.log b/src/Specific/NISTP256/AMD128/fenzDisplay.log index db2b799ea..53c690df8 100644 --- a/src/Specific/NISTP256/AMD128/fenzDisplay.log +++ b/src/Specific/NISTP256/AMD128/fenzDisplay.log @@ -5,16 +5,4 @@ Interp-η uint128_t x3 = (x2 | x1); return x3) x - : word128 * word128 → ReturnType (Tbase match (if match match (let (lower, _) := Synthesis.P.bound1 in - lower) with - | 0%Z => Eq - | Z.pos _ => Lt - | Z.neg _ => Gt - end with - | Eq => true - | Lt => true - | Gt => false - end then Some 7 else None) with - | Some lgsz => Syntax.TWord lgsz - | None => Syntax.TZ - end) + : word128 * word128 → ReturnType uint128_t diff --git a/src/Specific/NISTP256/AMD64/CurveParameters.v b/src/Specific/NISTP256/AMD64/CurveParameters.v index f6ff3b583..90846add3 100644 --- a/src/Specific/NISTP256/AMD64/CurveParameters.v +++ b/src/Specific/NISTP256/AMD64/CurveParameters.v @@ -18,7 +18,7 @@ Definition curve : CurveParameters := a24 := None; coef_div_modulus := None; - goldilocks := Some false; + goldilocks := None; montgomery := true; freeze := Some false; ladderstep := false; @@ -27,7 +27,8 @@ Definition curve : CurveParameters := square_code := None; - upper_bound_of_exponent := None; + upper_bound_of_exponent_loose := None; + upper_bound_of_exponent_tight := None; allowable_bit_widths := None; freeze_extra_allowable_bit_widths := None; modinv_fuel := None diff --git a/src/Specific/NISTP256/AMD64/fenzDisplay.log b/src/Specific/NISTP256/AMD64/fenzDisplay.log index 241c31016..65afbc2d6 100644 --- a/src/Specific/NISTP256/AMD64/fenzDisplay.log +++ b/src/Specific/NISTP256/AMD64/fenzDisplay.log @@ -7,16 +7,4 @@ Interp-η uint64_t x9 = (x2 | x8); return x9) x - : word64 * word64 * word64 * word64 → ReturnType (Tbase match (if match match (let (lower, _) := Synthesis.P.bound1 in - lower) with - | 0%Z => Eq - | Z.pos _ => Lt - | Z.neg _ => Gt - end with - | Eq => true - | Lt => true - | Gt => false - end then Some 6 else None) with - | Some lgsz => Syntax.TWord lgsz - | None => Syntax.TZ - end) + : word64 * word64 * word64 * word64 → ReturnType uint64_t |