ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  acexmid GIF version

Theorem acexmid 5973
Description: The axiom of choice implies excluded middle. Theorem 1.3 in [Bauer] p. 483.

The statement of the axiom of choice given here is ac2 in the Metamath Proof Explorer (version of 3-Aug-2019). In particular, note that the choice function 𝑦 provides a value when 𝑧 is inhabited (as opposed to nonempty as in some statements of the axiom of choice).

Essentially the same proof can also be found at "The axiom of choice implies instances of EM", [Crosilla], p. "Set-theoretic principles incompatible with intuitionistic logic".

Often referred to as Diaconescu's theorem, or Diaconescu-Goodman-Myhill theorem, after Radu Diaconescu who discovered it in 1975 in the framework of topos theory and N. D. Goodman and John Myhill in 1978 in the framework of set theory (although it already appeared as an exercise in Errett Bishop's book Foundations of Constructive Analysis from 1967).

For this theorem stated using the df-ac 7356 and df-exmid 4258 syntaxes, see exmidac 7359. (Contributed by Jim Kingdon, 4-Aug-2019.)

Hypothesis
Ref Expression
acexmid.choice 𝑦𝑧𝑥𝑤𝑧 ∃!𝑣𝑧𝑢𝑦 (𝑧𝑢𝑣𝑢)
Assertion
Ref Expression
acexmid (𝜑 ∨ ¬ 𝜑)
Distinct variable group:   𝑥,𝑦,𝑧,𝑤,𝑣,𝑢
Allowed substitution hints:   𝜑(𝑥,𝑦,𝑧,𝑤,𝑣,𝑢)

Proof of Theorem acexmid
Dummy variables 𝑎 𝑏 𝑐 𝑑 𝑒 𝑓 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 nfv 1554 . . . . . . . . . . . . . 14 𝑣(𝑓𝑐 ∧ ∃𝑒𝑏 (𝑐𝑒𝑓𝑒))
21sb8eu 2070 . . . . . . . . . . . . 13 (∃!𝑓(𝑓𝑐 ∧ ∃𝑒𝑏 (𝑐𝑒𝑓𝑒)) ↔ ∃!𝑣[𝑣 / 𝑓](𝑓𝑐 ∧ ∃𝑒𝑏 (𝑐𝑒𝑓𝑒)))
3 eleq12 2274 . . . . . . . . . . . . . . . . . . . 20 ((𝑓 = 𝑣𝑐 = 𝑧) → (𝑓𝑐𝑣𝑧))
43ancoms 268 . . . . . . . . . . . . . . . . . . 19 ((𝑐 = 𝑧𝑓 = 𝑣) → (𝑓𝑐𝑣𝑧))
543adant3 1022 . . . . . . . . . . . . . . . . . 18 ((𝑐 = 𝑧𝑓 = 𝑣𝑏 = 𝑦) → (𝑓𝑐𝑣𝑧))
6 eleq12 2274 . . . . . . . . . . . . . . . . . . . . 21 ((𝑐 = 𝑧𝑒 = 𝑢) → (𝑐𝑒𝑧𝑢))
763ad2antl1 1164 . . . . . . . . . . . . . . . . . . . 20 (((𝑐 = 𝑧𝑓 = 𝑣𝑏 = 𝑦) ∧ 𝑒 = 𝑢) → (𝑐𝑒𝑧𝑢))
8 eleq12 2274 . . . . . . . . . . . . . . . . . . . . 21 ((𝑓 = 𝑣𝑒 = 𝑢) → (𝑓𝑒𝑣𝑢))
983ad2antl2 1165 . . . . . . . . . . . . . . . . . . . 20 (((𝑐 = 𝑧𝑓 = 𝑣𝑏 = 𝑦) ∧ 𝑒 = 𝑢) → (𝑓𝑒𝑣𝑢))
107, 9anbi12d 473 . . . . . . . . . . . . . . . . . . 19 (((𝑐 = 𝑧𝑓 = 𝑣𝑏 = 𝑦) ∧ 𝑒 = 𝑢) → ((𝑐𝑒𝑓𝑒) ↔ (𝑧𝑢𝑣𝑢)))
11 simpl3 1007 . . . . . . . . . . . . . . . . . . 19 (((𝑐 = 𝑧𝑓 = 𝑣𝑏 = 𝑦) ∧ 𝑒 = 𝑢) → 𝑏 = 𝑦)
1210, 11cbvrexdva2 2753 . . . . . . . . . . . . . . . . . 18 ((𝑐 = 𝑧𝑓 = 𝑣𝑏 = 𝑦) → (∃𝑒𝑏 (𝑐𝑒𝑓𝑒) ↔ ∃𝑢𝑦 (𝑧𝑢𝑣𝑢)))
135, 12anbi12d 473 . . . . . . . . . . . . . . . . 17 ((𝑐 = 𝑧𝑓 = 𝑣𝑏 = 𝑦) → ((𝑓𝑐 ∧ ∃𝑒𝑏 (𝑐𝑒𝑓𝑒)) ↔ (𝑣𝑧 ∧ ∃𝑢𝑦 (𝑧𝑢𝑣𝑢))))
14133com23 1214 . . . . . . . . . . . . . . . 16 ((𝑐 = 𝑧𝑏 = 𝑦𝑓 = 𝑣) → ((𝑓𝑐 ∧ ∃𝑒𝑏 (𝑐𝑒𝑓𝑒)) ↔ (𝑣𝑧 ∧ ∃𝑢𝑦 (𝑧𝑢𝑣𝑢))))
15143expa 1208 . . . . . . . . . . . . . . 15 (((𝑐 = 𝑧𝑏 = 𝑦) ∧ 𝑓 = 𝑣) → ((𝑓𝑐 ∧ ∃𝑒𝑏 (𝑐𝑒𝑓𝑒)) ↔ (𝑣𝑧 ∧ ∃𝑢𝑦 (𝑧𝑢𝑣𝑢))))
1615sbiedv 1815 . . . . . . . . . . . . . 14 ((𝑐 = 𝑧𝑏 = 𝑦) → ([𝑣 / 𝑓](𝑓𝑐 ∧ ∃𝑒𝑏 (𝑐𝑒𝑓𝑒)) ↔ (𝑣𝑧 ∧ ∃𝑢𝑦 (𝑧𝑢𝑣𝑢))))
1716eubidv 2065 . . . . . . . . . . . . 13 ((𝑐 = 𝑧𝑏 = 𝑦) → (∃!𝑣[𝑣 / 𝑓](𝑓𝑐 ∧ ∃𝑒𝑏 (𝑐𝑒𝑓𝑒)) ↔ ∃!𝑣(𝑣𝑧 ∧ ∃𝑢𝑦 (𝑧𝑢𝑣𝑢))))
182, 17bitrid 192 . . . . . . . . . . . 12 ((𝑐 = 𝑧𝑏 = 𝑦) → (∃!𝑓(𝑓𝑐 ∧ ∃𝑒𝑏 (𝑐𝑒𝑓𝑒)) ↔ ∃!𝑣(𝑣𝑧 ∧ ∃𝑢𝑦 (𝑧𝑢𝑣𝑢))))
19 df-reu 2495 . . . . . . . . . . . 12 (∃!𝑓𝑐𝑒𝑏 (𝑐𝑒𝑓𝑒) ↔ ∃!𝑓(𝑓𝑐 ∧ ∃𝑒𝑏 (𝑐𝑒𝑓𝑒)))
20 df-reu 2495 . . . . . . . . . . . 12 (∃!𝑣𝑧𝑢𝑦 (𝑧𝑢𝑣𝑢) ↔ ∃!𝑣(𝑣𝑧 ∧ ∃𝑢𝑦 (𝑧𝑢𝑣𝑢)))
2118, 19, 203bitr4g 223 . . . . . . . . . . 11 ((𝑐 = 𝑧𝑏 = 𝑦) → (∃!𝑓𝑐𝑒𝑏 (𝑐𝑒𝑓𝑒) ↔ ∃!𝑣𝑧𝑢𝑦 (𝑧𝑢𝑣𝑢)))
2221adantr 276 . . . . . . . . . 10 (((𝑐 = 𝑧𝑏 = 𝑦) ∧ 𝑑 = 𝑤) → (∃!𝑓𝑐𝑒𝑏 (𝑐𝑒𝑓𝑒) ↔ ∃!𝑣𝑧𝑢𝑦 (𝑧𝑢𝑣𝑢)))
23 simpll 527 . . . . . . . . . 10 (((𝑐 = 𝑧𝑏 = 𝑦) ∧ 𝑑 = 𝑤) → 𝑐 = 𝑧)
2422, 23cbvraldva2 2752 . . . . . . . . 9 ((𝑐 = 𝑧𝑏 = 𝑦) → (∀𝑑𝑐 ∃!𝑓𝑐𝑒𝑏 (𝑐𝑒𝑓𝑒) ↔ ∀𝑤𝑧 ∃!𝑣𝑧𝑢𝑦 (𝑧𝑢𝑣𝑢)))
2524ancoms 268 . . . . . . . 8 ((𝑏 = 𝑦𝑐 = 𝑧) → (∀𝑑𝑐 ∃!𝑓𝑐𝑒𝑏 (𝑐𝑒𝑓𝑒) ↔ ∀𝑤𝑧 ∃!𝑣𝑧𝑢𝑦 (𝑧𝑢𝑣𝑢)))
2625adantll 476 . . . . . . 7 (((𝑎 = 𝑥𝑏 = 𝑦) ∧ 𝑐 = 𝑧) → (∀𝑑𝑐 ∃!𝑓𝑐𝑒𝑏 (𝑐𝑒𝑓𝑒) ↔ ∀𝑤𝑧 ∃!𝑣𝑧𝑢𝑦 (𝑧𝑢𝑣𝑢)))
27 simpll 527 . . . . . . 7 (((𝑎 = 𝑥𝑏 = 𝑦) ∧ 𝑐 = 𝑧) → 𝑎 = 𝑥)
2826, 27cbvraldva2 2752 . . . . . 6 ((𝑎 = 𝑥𝑏 = 𝑦) → (∀𝑐𝑎𝑑𝑐 ∃!𝑓𝑐𝑒𝑏 (𝑐𝑒𝑓𝑒) ↔ ∀𝑧𝑥𝑤𝑧 ∃!𝑣𝑧𝑢𝑦 (𝑧𝑢𝑣𝑢)))
2928cbvexdva 1956 . . . . 5 (𝑎 = 𝑥 → (∃𝑏𝑐𝑎𝑑𝑐 ∃!𝑓𝑐𝑒𝑏 (𝑐𝑒𝑓𝑒) ↔ ∃𝑦𝑧𝑥𝑤𝑧 ∃!𝑣𝑧𝑢𝑦 (𝑧𝑢𝑣𝑢)))
3029cbvalv 1944 . . . 4 (∀𝑎𝑏𝑐𝑎𝑑𝑐 ∃!𝑓𝑐𝑒𝑏 (𝑐𝑒𝑓𝑒) ↔ ∀𝑥𝑦𝑧𝑥𝑤𝑧 ∃!𝑣𝑧𝑢𝑦 (𝑧𝑢𝑣𝑢))
31 acexmid.choice . . . 4 𝑦𝑧𝑥𝑤𝑧 ∃!𝑣𝑧𝑢𝑦 (𝑧𝑢𝑣𝑢)
3230, 31mpgbir 1479 . . 3 𝑎𝑏𝑐𝑎𝑑𝑐 ∃!𝑓𝑐𝑒𝑏 (𝑐𝑒𝑓𝑒)
3332spi 1562 . 2 𝑏𝑐𝑎𝑑𝑐 ∃!𝑓𝑐𝑒𝑏 (𝑐𝑒𝑓𝑒)
3433acexmidlemv 5972 1 (𝜑 ∨ ¬ 𝜑)
Colors of variables: wff set class
Syntax hints:  ¬ wn 3  wa 104  wb 105  wo 712  w3a 983  wal 1373  wex 1518  [wsb 1788  ∃!weu 2057  wral 2488  wrex 2489  ∃!wreu 2490
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 617  ax-in2 618  ax-io 713  ax-5 1473  ax-7 1474  ax-gen 1475  ax-ie1 1519  ax-ie2 1520  ax-8 1530  ax-10 1531  ax-11 1532  ax-i12 1533  ax-bndl 1535  ax-4 1536  ax-17 1552  ax-i9 1556  ax-ial 1560  ax-i5r 1561  ax-14 2183  ax-ext 2191  ax-sep 4181  ax-nul 4189  ax-pow 4237  ax-pr 4272
This theorem depends on definitions:  df-bi 117  df-3or 984  df-3an 985  df-tru 1378  df-nf 1487  df-sb 1789  df-eu 2060  df-clab 2196  df-cleq 2202  df-clel 2205  df-nfc 2341  df-ral 2493  df-rex 2494  df-reu 2495  df-rab 2497  df-v 2781  df-sbc 3009  df-dif 3179  df-un 3181  df-in 3183  df-ss 3190  df-nul 3472  df-pw 3631  df-sn 3652  df-pr 3653  df-uni 3868  df-tr 4162  df-iord 4434  df-on 4436  df-suc 4439  df-iota 5254  df-riota 5927
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator