diff options
| author |  msozeau <msozeau@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2008-04-28 09:27:17 +0000 |
|---|---|---|
| committer | msozeau <msozeau@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2008-04-28 09:27:17 +0000 |
| commit | 3478ffda0a0a83951db341eb68fc6b71877c1392 (patch) | |
| tree | 7e4bc66924da99168e75bcc5b4e614190d68aa9b /theories/Lists | |
| parent | 7a4ccdc7eb1a6afd21768963a249ec3617584482 (diff) | |
Backtrack on using metas eagerly in auto, only done in "new auto" for
now. Fix proof scripts that failed correspondingly. Should make many
contribs compile again...
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10863 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'theories/Lists')
| -rw-r--r-- | theories/Lists/List.v | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/theories/Lists/List.v b/theories/Lists/List.v index 78a2db534..51d3f192d 100644 --- a/theories/Lists/List.v +++ b/theories/Lists/List.v @@ -687,6 +687,7 @@ Section ListOps. rewrite (minus_plus_simpl_l_reverse (length l) n 1). replace (1 + length l) with (S (length l)); auto with arith. rewrite <- minus_Sn_m; auto with arith. + apply IHl ; auto with arith. rewrite rev_length; auto. Qed. @@ -1362,6 +1363,7 @@ End Fold_Right_Recursor. destruct n; destruct d; simpl; auto. destruct a; destruct (split l); simpl; auto. destruct a; destruct (split l); simpl in *; auto. + apply IHl. Qed. Lemma split_length_l : forall (l:list (A*B)), |