diff options
| author |  Andres Erbsen <andreser@mit.edu> | 2016-03-03 16:09:34 -0500 |
|---|---|---|
| committer | Andres Erbsen <andreser@mit.edu> | 2016-03-03 16:09:34 -0500 |
| commit | 2fa2df7f86b39edfb6d817954c1a5332c4e1a431 (patch) | |
| tree | 92f22995e846fc6c14eefbfa0d7bb6cd64b25264 /src/ModularArithmetic/ModularArithmeticTheorems.v | |
| parent | fc7a0870a4e93e9410f4b1da94357c4802110212 (diff) | |
CompleteEdwardsCurveTheorems: associativity proof that times out on Qed
Diffstat (limited to 'src/ModularArithmetic/ModularArithmeticTheorems.v')
| -rw-r--r-- | src/ModularArithmetic/ModularArithmeticTheorems.v | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/src/ModularArithmetic/ModularArithmeticTheorems.v b/src/ModularArithmetic/ModularArithmeticTheorems.v index 4602e8781..f39cc4176 100644 --- a/src/ModularArithmetic/ModularArithmeticTheorems.v +++ b/src/ModularArithmetic/ModularArithmeticTheorems.v @@ -581,6 +581,16 @@ Section VariousModulo. Fdefn. Qed. + Lemma F_pow_2_r : forall x : F m, x^2 = x*x. + Proof. + intros. ring. + Qed. + + Lemma F_pow_3_r : forall x : F m, x^3 = x*x*x. + Proof. + intros. ring. + Qed. + Lemma F_pow_add : forall (x : F m) k j, x ^ j * x ^ k = x ^ (j + k). Proof. intros. |