aboutsummaryrefslogtreecommitdiff
path: root/src/Specific/solinas64_2e255m19_5limbs_donna/fesquare.v
diff options
context:
space:
mode:
authorGravatar Jason Gross <jgross@mit.edu>2018-01-10 18:12:14 -0500
committerGravatar Andres Erbsen <andreser@mit.edu>2018-01-15 04:16:50 -0500
commitd50c368e0cf5c25520fdd9e57695b43640c77fe0 (patch)
tree786b6e1ef822a7b4cd42dd6f72ab8ad98d270e3b /src/Specific/solinas64_2e255m19_5limbs_donna/fesquare.v
parent36e2e828be55cb58f985208de0ef7085cedecdd2 (diff)
Add x25519 donna versions with the new way of generating C code
Diffstat (limited to 'src/Specific/solinas64_2e255m19_5limbs_donna/fesquare.v')
-rw-r--r--src/Specific/solinas64_2e255m19_5limbs_donna/fesquare.v14
1 files changed, 14 insertions, 0 deletions
diff --git a/src/Specific/solinas64_2e255m19_5limbs_donna/fesquare.v b/src/Specific/solinas64_2e255m19_5limbs_donna/fesquare.v
new file mode 100644
index 000000000..d6f25e43a
--- /dev/null
+++ b/src/Specific/solinas64_2e255m19_5limbs_donna/fesquare.v
@@ -0,0 +1,14 @@
+Require Import Crypto.Arithmetic.PrimeFieldTheorems.
+Require Import Crypto.Specific.solinas64_2e255m19_5limbs_donna.Synthesis.
+
+(* TODO : change this to field once field isomorphism happens *)
+Definition square :
+ { square : feBW_loose -> feBW_tight
+ | forall a, phiBW_tight (square a) = F.mul (phiBW_loose a) (phiBW_loose a) }.
+Proof.
+ Set Ltac Profiling.
+ Time synthesize_square ().
+ Show Ltac Profile.
+Time Defined.
+
+Print Assumptions square.