From 1b35575d1409d90f3dad7398e98bacc8fa72f081 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. --- theories/tactics.v | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/theories/tactics.v b/theories/tactics.v index f0402a28..c2190568 100644 --- a/theories/tactics.v +++ b/theories/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