From 477bdffdb642698143f7da856e75db1dbe30653d Mon Sep 17 00:00:00 2001
From: msozeau
Date: Sun, 26 Aug 2007 00:33:43 +0000
Subject: Add more equality tactics. Upgrade program_simpl for discrimination
 of conjuncts.

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10093 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 theories/Program/Tactics.v | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'theories/Program/Tactics.v')

diff --git a/theories/Program/Tactics.v b/theories/Program/Tactics.v
index d5ccdf1c5b..dfe8453d10 100644
--- a/theories/Program/Tactics.v
+++ b/theories/Program/Tactics.v
@@ -162,4 +162,4 @@ Tactic Notation "dependent" "induction" ident(H) "generalizing" ne_hyp_list(l) :
 (** The default simplification tactic used by Program. *)
 
 Ltac program_simpl := simpl ; intros ; destruct_conjs ; simpl in * ; try subst ; 
-  try (solve [ red ; intros ; discriminate ]) ; auto with *.  
+  try (solve [ red ; intros ; destruct_conjs ; discriminate ]) ; auto with *.  
-- 
cgit v1.2.3