aboutsummaryrefslogtreecommitdiff
path: root/src/Util/ZUtil/AddModulo.v
diff options
context:
space:
mode:
Diffstat (limited to 'src/Util/ZUtil/AddModulo.v')
-rw-r--r--src/Util/ZUtil/AddModulo.v9
1 files changed, 9 insertions, 0 deletions
diff --git a/src/Util/ZUtil/AddModulo.v b/src/Util/ZUtil/AddModulo.v
new file mode 100644
index 000000000..0f80a75d9
--- /dev/null
+++ b/src/Util/ZUtil/AddModulo.v
@@ -0,0 +1,9 @@
+Require Import Coq.ZArith.ZArith.
+Require Import Crypto.Util.ZUtil.Definitions.
+Local Open Scope Z_scope.
+
+Module Z.
+ Lemma add_modulo_correct x y modulus :
+ Z.add_modulo x y modulus = if (modulus <=? x + y) then (x + y) - modulus else (x + y).
+ Proof. reflexivity. Qed.
+End Z. \ No newline at end of file