From 2086b479bd8114ba8b32bff3f1c95ebfb35fedb8 Mon Sep 17 00:00:00 2001
From: Robbert Krebbers <mail@robbertkrebbers.nl>
Date: Thu, 14 Jan 2016 13:44:49 +0100
Subject: [PATCH] Fix setoid_subst.

---
 prelude/tactics.v | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/prelude/tactics.v b/prelude/tactics.v
index f0402a286..c2190568d 100644
--- a/prelude/tactics.v
+++ b/prelude/tactics.v
@@ -223,8 +223,8 @@ Ltac setoid_subst_aux R x :=
 Ltac setoid_subst :=
   repeat match goal with
   | _ => progress simplify_equality'
-  | H : @equiv _ ?e ?x _ |- _ => setoid_subst_aux (@equiv _ e) x
-  | H : @equiv _ ?e _ ?x |- _ => symmetry in H; setoid_subst_aux (@equiv _ e) x
+  | H : @equiv ?A ?e ?x _ |- _ => setoid_subst_aux (@equiv A e) x
+  | H : @equiv ?A ?e _ ?x |- _ => symmetry in H; setoid_subst_aux (@equiv A e) x
   end.
 
 (** Given a tactic [tac2] generating a list of terms, [iter tac1 tac2]
-- 
GitLab