aboutsummaryrefslogtreecommitdiff
path: root/src/Util/Sum.v
diff options
context:
space:
mode:
authorGravatar Jason Gross <jgross@mit.edu>2019-02-28 20:36:00 -0500
committerGravatar Jason Gross <jasongross9@gmail.com>2019-03-04 16:54:17 -0500
commite23824e1cc026671c5928000e95c6d6927437b99 (patch)
tree891752177d03acbea035e3bfe6911bb42a8469c1 /src/Util/Sum.v
parent33f32edf2278232a5236181514aa9836b024450b (diff)
Make [reflect] a typeclass and add a bunch of lemmas
Diffstat (limited to 'src/Util/Sum.v')
-rw-r--r--src/Util/Sum.v2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/Util/Sum.v b/src/Util/Sum.v
index 4d4fde6ac..31019d2da 100644
--- a/src/Util/Sum.v
+++ b/src/Util/Sum.v
@@ -3,6 +3,8 @@ Require Import Coq.Relations.Relation_Definitions.
Require Import Crypto.Util.Decidable.
Require Import Crypto.Util.GlobalSettings.
+Scheme Equality for sum.
+
Definition sumwise {A B} (RA:relation A) (RB : relation B) : relation (A + B)
:= fun x y => match x, y with
| inl x', inl y' => RA x' y'