diff options
| author |  msozeau <msozeau@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2009-11-13 00:38:28 +0000 |
|---|---|---|
| committer | msozeau <msozeau@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2009-11-13 00:38:28 +0000 |
| commit | c242a71f206dfbafff457a1229b6322172d64f55 (patch) | |
| tree | 9248af1dfe5b8cd8dfafd37aa31043ea840aa2fb /test-suite/success/ProgramWf.v | |
| parent | 0024fe475225340d652d15e68d1e4f657d76cc08 (diff) | |
Fix test-suite scripts: [Generalizable Variables] and small
changes in obligations.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@12514 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'test-suite/success/ProgramWf.v')
| -rw-r--r-- | test-suite/success/ProgramWf.v | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/test-suite/success/ProgramWf.v b/test-suite/success/ProgramWf.v index 18111f07c..81bdbc29f 100644 --- a/test-suite/success/ProgramWf.v +++ b/test-suite/success/ProgramWf.v @@ -56,7 +56,10 @@ Lemma merge_unfold n m : merge n m = | 0 => 0 | S n' => merge n' m end. -Proof. intros. unfold_sub merge (merge n m). simpl. destruct n ; reflexivity. Qed. +Proof. intros. unfold merge at 1. unfold merge_func. + unfold_sub merge (merge n m). + simpl. destruct n ; reflexivity. +Qed. Print merge. |