From baa585b4fce11c7ce4eb4493c98137fd87e74c0c Mon Sep 17 00:00:00 2001 From: Jason Gross Date: Fri, 22 Jun 2018 17:59:44 -0400 Subject: Add list_beq --- src/Util/ListUtil.v | 2 ++ 1 file changed, 2 insertions(+) (limited to 'src/Util/ListUtil.v') diff --git a/src/Util/ListUtil.v b/src/Util/ListUtil.v index abb1395b3..f13511ba5 100644 --- a/src/Util/ListUtil.v +++ b/src/Util/ListUtil.v @@ -11,6 +11,8 @@ Require Export Crypto.Util.Tactics.DestructHead. Require Import Crypto.Util.Tactics.SpecializeBy. Require Import Crypto.Util.Tactics.RewriteHyp. +Scheme Equality for list. + Definition list_case {A} (P : list A -> Type) (N : P nil) (C : forall x xs, P (cons x xs)) (ls : list A) -- cgit v1.2.3