diff options
author | Andres Erbsen <andreser@mit.edu> | 2015-12-05 20:42:27 -0500 |
---|---|---|
committer | Andres Erbsen <andreser@mit.edu> | 2015-12-05 20:42:27 -0500 |
commit | a0aee348671df03aa11bc359e413e10c15b36c44 (patch) | |
tree | ebcb55960f85a2957df8824a83b85dcb53c4cdc2 /src | |
parent | d3c2b7519ca7d02f006c6b5e1462f59a55c68762 (diff) |
GaloisTheory: prove 4 trivial admits. GF25519 only assumption is now that 2^255-19 is prime.
Diffstat (limited to 'src')
-rw-r--r-- | src/Galois/GaloisTheory.v | 20 |
1 files changed, 15 insertions, 5 deletions
diff --git a/src/Galois/GaloisTheory.v b/src/Galois/GaloisTheory.v index f8d1c4c7a..3cfa0323c 100644 --- a/src/Galois/GaloisTheory.v +++ b/src/Galois/GaloisTheory.v @@ -182,21 +182,31 @@ Module GaloisTheory (M: Modulus). Lemma inject_distr_add : forall (m n : Z), inject (m + n) = inject m + inject n. - Admitted. + Proof. + galois. + Qed. Lemma inject_distr_sub : forall (m n : Z), inject (m - n) = inject m - inject n. - Admitted. + Proof. + galois. + Qed. Lemma inject_distr_mul : forall (m n : Z), inject (m * n) = inject m * inject n. - Admitted. + Proof. + galois. + Qed. Lemma inject_eq : forall (x : GF), inject x = x. - Admitted. + Proof. + galois. + Qed. Lemma inject_mod_eq : forall x, inject x = inject (x mod modulus). - Admitted. + Proof. + galois. + Qed. Definition GFquotrem(a b: GF): GF * GF := match (Z.quotrem a b) with |