diff options
Diffstat (limited to 'test-suite/success/Rename.v')
-rw-r--r-- | test-suite/success/Rename.v | 21 |
1 files changed, 17 insertions, 4 deletions
diff --git a/test-suite/success/Rename.v b/test-suite/success/Rename.v index edb20a81..0576f3c6 100644 --- a/test-suite/success/Rename.v +++ b/test-suite/success/Rename.v @@ -1,5 +1,18 @@ -Goal (n:nat)(n=O)->(n=O). -Intros. -Rename n into p. -NewInduction p; Auto. +Goal forall n : nat, n = 0 -> n = 0. +intros. +rename n into p. +induction p; auto. Qed. + +(* Submitted by Iris Loeb (#842) *) + +Section rename. + +Variable A:Prop. + +Lemma Tauto: A->A. +rename A into B. +tauto. +Qed. + +End rename. |