diff options
Diffstat (limited to 'src/Experiments')
| -rw-r--r-- | src/Experiments/SpecEd25519.v | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Experiments/SpecEd25519.v b/src/Experiments/SpecEd25519.v index 659a0ec66..30d8ce13d 100644 --- a/src/Experiments/SpecEd25519.v +++ b/src/Experiments/SpecEd25519.v @@ -32,7 +32,7 @@ Qed. Ltac q_bound := pose proof two_lt_q; omega. Lemma square_a : isSquare a. Proof. - Lemma q_1mod4 : (q mod 4 = 1)%Z. reflexivity. Qed. + assert (q_1mod4 : (q mod 4 = 1)%Z) by abstract reflexivity. intros. pose proof (minus1_square_1mod4 q prime_q q_1mod4) as minus1_square. destruct minus1_square as [b b_id]. @@ -162,4 +162,4 @@ Global Instance Ed25519 : @EdDSA point E.eq add zero E.opp E.mul b H c n l B Een EdDSA_l_prime := prime_l; EdDSA_l_odd := l_odd; EdDSA_l_order_B := l_order_B - }.
\ No newline at end of file + }. |