diff options
| author | glondu | 2007-12-17 13:01:09 +0000 |
|---|---|---|
| committer | glondu | 2007-12-17 13:01:09 +0000 |
| commit | ec0eb7820be8ea48ed20d0e9dea88ce6f0693fa7 (patch) | |
| tree | a0897ae9c2881898d246ac8a1cd4a6f6342f3d42 | |
| parent | 2adaf050d5adec8028d1fc13a480525db2fd24a7 (diff) | |
Quelques arguments en plus...
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10385 85f007b7-540e-0410-9357-904b9bb8a0f7
| -rw-r--r-- | theories/Init/Tactics.v | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/theories/Init/Tactics.v b/theories/Init/Tactics.v index de38e88c14..45f239da4e 100644 --- a/theories/Init/Tactics.v +++ b/theories/Init/Tactics.v @@ -106,6 +106,10 @@ Tactic Notation "narrow" hyp(H) "with" constr(x) constr(y) constr(z) constr(t):= generalize (H x y z t); clear H; intro H. Tactic Notation "narrow" hyp(H) "with" constr(x) constr(y) constr(z) constr(t) constr(u):= generalize (H x y z t u); clear H; intro H. +Tactic Notation "narrow" hyp(H) "with" constr(x) constr(y) constr(z) constr(t) constr(u) constr(v) := + generalize (H x y z t u v); clear H; intro H. +Tactic Notation "narrow" hyp(H) "with" constr(x) constr(y) constr(z) constr(t) constr(u) constr(v) constr(w) := + generalize (H x y z t u v w); clear H; intro H. (* Rewriting in all hypothesis several times everywhere *) |