diff options
| author |  letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2010-01-12 22:11:29 +0000 |
|---|---|---|
| committer | letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2010-01-12 22:11:29 +0000 |
| commit | 4fdec1dc05525f1c5f9b52566b6dcfd02bf3c219 (patch) | |
| tree | 7b707125db7454a064caa559d44b1165c0c3296d /theories/Structures/GenericMinMax.v | |
| parent | 8053375521352f7f428151e23e314671d646e75d (diff) | |
GenericMinMax: still a min_case_strong with hypothesis in the wrong order
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@12661 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'theories/Structures/GenericMinMax.v')
| -rw-r--r-- | theories/Structures/GenericMinMax.v | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/theories/Structures/GenericMinMax.v b/theories/Structures/GenericMinMax.v index 232989fad..5dec73c62 100644 --- a/theories/Structures/GenericMinMax.v +++ b/theories/Structures/GenericMinMax.v @@ -594,7 +594,7 @@ Module UsualMinMaxDecProperties Proof. exact P.max_dec. Defined. Lemma min_case_strong : forall n m (P:O.t -> Type), - (m<=n -> P m) -> (n<=m -> P n) -> P (min n m). + (n<=m -> P n) -> (m<=n -> P m) -> P (min n m). Proof. intros; apply P.min_case_strong; auto. congruence. Defined. Lemma min_case : forall n m (P:O.t -> Type), |