From ca9b228384584e125a146b68157180d229a5914e Mon Sep 17 00:00:00 2001
From: herbelin
Date: Mon, 2 Jul 2001 23:24:15 +0000
Subject: Evar et Zeta ne sont plus implicites dans Delta (mais le restent dans
 Compute, nouveaux flags utilisateurs pour Evar et Zeta

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@1821 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 contrib/field/Field_Tactic.v | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/contrib/field/Field_Tactic.v b/contrib/field/Field_Tactic.v
index 0ae9db9967..de8efbb39c 100644
--- a/contrib/field/Field_Tactic.v
+++ b/contrib/field/Field_Tactic.v
@@ -177,8 +177,8 @@ Tactic Definition Multiply mul :=
     [Intro;
      Let id = GrepMult In
      Apply (mult_eq ?1 ?3 ?4 mul ?2 id)(*;
-     Cbv Beta Delta -[interp_ExprA] Iota*)
-    |Cbv Beta Delta -[not] Iota;
+     Cbv Beta Delta -[interp_ExprA] Zeta Evar Iota*)
+    |Cbv Beta Delta -[not] Zeta Evar Iota;
      Let AmultT = Eval Compute in (Amult ?1)
      And AoneT = Eval Compute in (Aone ?1) In
      (Match Context With
-- 
cgit v1.2.3