diff options
| author | Hugo Herbelin | 2015-12-05 10:21:33 +0100 |
|---|---|---|
| committer | Hugo Herbelin | 2015-12-05 10:23:05 +0100 |
| commit | b7e72d0e0ca64168fc16875bf779dbc27d2a1820 (patch) | |
| tree | 1501dea5e28b1a07d998f6d8bfa52d4d5770ddbd | |
| parent | 6b39f9904b4e9d5260c4fd97ff10e52c489c6051 (diff) | |
Fix to previous commit (ClassicalFacts.v).
| -rw-r--r-- | theories/Logic/ClassicalFacts.v | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/theories/Logic/ClassicalFacts.v b/theories/Logic/ClassicalFacts.v index f82b00a0dd..d4ebfb42fa 100644 --- a/theories/Logic/ClassicalFacts.v +++ b/theories/Logic/ClassicalFacts.v @@ -688,7 +688,7 @@ Section Unrestricted_minimization_entails_excluded_middle. apply unrestricted_minimization in h as ([|[|m]] & hm & hmm). + intuition. + right. - intros /p₀/hmm/PeanoNat.Nat.nle_succ_0-HA. assumption. + intros HA. apply p₀, hmm, PeanoNat.Nat.nle_succ_0 in HA. assumption. + destruct hm as [([=],_) | [=] ]. Qed. |