aboutsummaryrefslogtreecommitdiff
path: root/src/Curves
diff options
context:
space:
mode:
authorGravatar Andres Erbsen <andreser@mit.edu>2015-09-21 23:50:53 -0400
committerGravatar Andres Erbsen <andreser@mit.edu>2015-09-21 23:50:53 -0400
commitb43e6d8e692446a9a52602c2454245fabfb97a39 (patch)
tree7409f1868a232817b9d9864d30ed674389a400eb /src/Curves
parent125870b97ebe0d7d5728cb11c2f960c03388b502 (diff)
in case of not-on-curve points, extended coordinate addition and twisted coordinate addition may have different behavior
Diffstat (limited to 'src/Curves')
-rw-r--r--src/Curves/PointFormats.v17
1 files changed, 3 insertions, 14 deletions
diff --git a/src/Curves/PointFormats.v b/src/Curves/PointFormats.v
index bcdf30ab9..1c977c80e 100644
--- a/src/Curves/PointFormats.v
+++ b/src/Curves/PointFormats.v
@@ -217,8 +217,8 @@ Module PointFormats (M: Modulus).
Abort.
Lemma extendedM1AddRep : forall (d:GF) (P1 P2 : extended) (tP1 tP2 : twisted)
- (P1con : extendedValid P1) (P1rep : extendedToTwisted P1 = tP1)
- (P2con : extendedValid P2) (P2rep : extendedToTwisted P2 = tP2),
+ (P1con : extendedValid P1) (P1rep : extendedToTwisted P1 = tP1) (P1on : twistedOnCurve (0-1) d tP1)
+ (P2con : extendedValid P2) (P2rep : extendedToTwisted P2 = tP2) (P2on : twistedOnCurve (0-1) d tP2),
twistedAdd (0-1) d tP1 tP2 = extendedToTwisted (extendedM1Add d P1 P2).
Proof.
intros.
@@ -228,17 +228,6 @@ Module PointFormats (M: Modulus).
invcs P1rep; invcs P2rep.
f_equal.
-
- assert (T1 = X1 * Y1 / Z1).
-
- (*
- FIXME:
- In nested Ltac calls to "field" and
- "field_lookup PackField ltac:FIELD [ ] G" (expanded to
- "field_lookup <dynamic [value]> [ ] (T1 = X1 * Y2 / Z2)"), last call failed.
- Error: cannot find a declared field structure over "GF"
- *)
-
- Abort.
+ Abort.
End PointFormats.