diff options
author | letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2012-07-05 16:56:37 +0000 |
---|---|---|
committer | letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2012-07-05 16:56:37 +0000 |
commit | ffb64d16132dd80f72ecb619ef87e3eee1fa8bda (patch) | |
tree | 5368562b42af1aeef7e19b4bd897c9fc5655769b /test-suite/success/induct.v | |
parent | a46ccd71539257bb55dcddd9ae8510856a5c9a16 (diff) |
Kills the useless tactic annotations "in |- *"
Most of these heavyweight annotations were introduced a long time ago
by the automatic 7.x -> 8.0 translator
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@15518 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'test-suite/success/induct.v')
-rw-r--r-- | test-suite/success/induct.v | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/test-suite/success/induct.v b/test-suite/success/induct.v index 01ebfc4f0..8ed941f86 100644 --- a/test-suite/success/induct.v +++ b/test-suite/success/induct.v @@ -46,21 +46,21 @@ Qed. Goal forall x, S x = S (S x). intros. -induction (S _) in |- * at -2. +induction (S _) at -2. now_show (0=1). Undo 2. -induction (S _) in |- * at 1 3. +induction (S _) at 1 3. now_show (0=1). Undo 2. -induction (S _) in |- * at 1. +induction (S _) at 1. now_show (0=S (S x)). Undo 2. -induction (S _) in |- * at 2. +induction (S _) at 2. now_show (S x=0). Undo 2. -induction (S _) in |- * at 3. +induction (S _) at 3. now_show (S x=1). Undo 2. -Fail induction (S _) in |- * at 4. +Fail induction (S _) at 4. Abort. |