HomeHome Metamath Proof Explorer < Previous   Next >
Related theorems
GIF version

Theorem kmlem15 3594
Description: Lemma for 5-quantifier AC of Kurt Maes, Th. 4, part of 5 <=> 4.
Hypotheses
Ref Expression
kmlem14.1 (φ ↔ (zy → ((vx ∧ ¬ y = v) ∧ zv)))
kmlem14.2 (ψ ↔ (zx → ((vzvy) ∧ ((uzuy) → u = v))))
kmlem14.3 (χ ↔ ∀zx ∃!v v ∈ (zy))
Assertion
Ref Expression
kmlem15 ((¬ yxχ) ↔ ∀zvuyxψ))
Distinct variable group(s):   x,y,z,v,u   φ,u

Proof of Theorem kmlem15
StepHypRef Expression
1 kmlem14.3 . . . 4 (χ ↔ ∀zx ∃!v v ∈ (zy))
2 ax-17 925 . . . . . . 7 (v ∈ (zy) → ∀u v ∈ (zy))
32eu1 1019 . . . . . 6 (∃!v v ∈ (zy) ↔ ∃v(v ∈ (zy) ∧ ∀u([u / v]v ∈ (zy) → v = u)))
4 elin 1635 . . . . . . . . 9 (v ∈ (zy) ↔ (vzvy))
5 ax-17 925 . . . . . . . . . . . . 13 (u ∈ (zy) → ∀v u ∈ (zy))
6 eleq1 1149 . . . . . . . . . . . . 13 (v = u → (v ∈ (zy) ↔ u ∈ (zy)))
75, 6sbie 904 . . . . . . . . . . . 12 ([u / v]v ∈ (zy) ↔ u ∈ (zy))
8 elin 1635 . . . . . . . . . . . 12 (u ∈ (zy) ↔ (uzuy))
97, 8bitr 151 . . . . . . . . . . 11 ([u / v]v ∈ (zy) ↔ (uzuy))
10 cleqcom 1103 . . . . . . . . . . 11 (v = uu = v)
119, 10imbi12i 163 . . . . . . . . . 10 (([u / v]v ∈ (zy) → v = u) ↔ ((uzuy) → u = v))
1211bial 695 . . . . . . . . 9 (∀u([u / v]v ∈ (zy) → v = u) ↔ ∀u((uzuy) → u = v))
134, 12anbi12i 369 . . . . . . . 8 ((v ∈ (zy) ∧ ∀u([u / v]v ∈ (zy) → v = u)) ↔ ((vzvy) ∧ ∀u((uzuy) → u = v)))
14 19.28v 957 . . . . . . . 8 (∀u((vzvy) ∧ ((uzuy) → u = v)) ↔ ((vzvy) ∧ ∀u((uzuy) → u = v)))
1513, 14bitr4 154 . . . . . . 7 ((v ∈ (zy) ∧ ∀u([u / v]v ∈ (zy) → v = u)) ↔ ∀u((vzvy) ∧ ((uzuy) → u = v)))
1615biex 733 . . . . . 6 (∃v(v ∈ (zy) ∧ ∀u([u / v]v ∈ (zy) → v = u)) ↔ ∃vu((vzvy) ∧ ((uzuy) → u = v)))
173, 16bitr 151 . . . . 5 (∃!v v ∈ (zy) ↔ ∃vu((vzvy) ∧ ((uzuy) → u = v)))
1817biral 1223 . . . 4 (∀zx ∃!v v ∈ (zy) ↔ ∀zxvu((vzvy) ∧ ((uzuy) → u = v)))
19 df-ral 1205 . . . . 5 (∀zxvu((vzvy) ∧ ((uzuy) → u = v)) ↔ ∀z(zx → ∃vu((vzvy) ∧ ((uzuy) → u = v))))
20 kmlem14.2 . . . . . . . . . 10 (ψ ↔ (zx → ((vzvy) ∧ ((uzuy) → u = v))))
2120bial 695 . . . . . . . . 9 (∀uψ ↔ ∀u(zx → ((vzvy) ∧ ((uzuy) → u = v))))
22 19.21v 942 . . . . . . . . 9 (∀u(zx → ((vzvy) ∧ ((uzuy) → u = v))) ↔ (zx → ∀u((vzvy) ∧ ((uzuy) → u = v))))
2321, 22bitr 151 . . . . . . . 8 (∀uψ ↔ (zx → ∀u((vzvy) ∧ ((uzuy) → u = v))))
2423biex 733 . . . . . . 7 (∃vuψ ↔ ∃v(zx → ∀u((vzvy) ∧ ((uzuy) → u = v))))
25 19.37v 961 . . . . . . 7 (∃v(zx → ∀u((vzvy) ∧ ((uzuy) → u = v))) ↔ (zx → ∃vu((vzvy) ∧ ((uzuy) → u = v))))
2624, 25bitr 151 . . . . . 6 (∃vuψ ↔ (zx → ∃vu((vzvy) ∧ ((uzuy) → u = v))))
2726bial 695 . . . . 5 (∀zvuψ ↔ ∀z(zx → ∃vu((vzvy) ∧ ((uzuy) → u = v))))
2819, 27bitr4 154 . . . 4 (∀zxvu((vzvy) ∧ ((uzuy) → u = v)) ↔ ∀zvuψ)
291, 18, 283bitr 155 . . 3 (χ ↔ ∀zvuψ)
3029anbi2i 367 . 2 ((¬ yxχ) ↔ (¬ yx ∧ ∀zvuψ))
31 19.28v 957 . . 3 (∀zyx ∧ ∃vuψ) ↔ (¬ yx ∧ ∀zvuψ))
32 19.28v 957 . . . . . 6 (∀uyxψ) ↔ (¬ yx ∧ ∀uψ))
3332biex 733 . . . . 5 (∃vuyxψ) ↔ ∃vyx ∧ ∀uψ))
34 19.42v 966 . . . . 5 (∃vyx ∧ ∀uψ) ↔ (¬ yx ∧ ∃vuψ))
3533, 34bitr2 152 . . . 4 ((¬ yx ∧ ∃vuψ) ↔ ∃vuyxψ))
3635bial 695 . . 3 (∀zyx ∧ ∃vuψ) ↔ ∀zvuyxψ))
3731, 36bitr3 153 . 2 ((¬ yx ∧ ∀zvuψ) ↔ ∀zvuyxψ))
3830, 37bitr 151 1 ((¬ yxχ) ↔ ∀zvuyxψ))
Colors of variables: wff set class
Syntax hints:  ¬ wn 1   → wi 2   ↔ wb 127   ∧ wa 196  ∀wal 672  ∃wex 678   = weq 797   ∈ wel 803  [wsb 852  ∃!weu 1007   ∈ wcel 1092  ∀wral 1201   ∩ cin 1486
This theorem is referenced by:  kmlem16 3595
This theorem was proved from axioms:  ax-1 3  ax-2 4  ax-3 5  ax-mp 6  ax-4 673  ax-5 674  ax-6 675  ax-7 676  ax-gen 677  ax-8 798  ax-9 799  ax-10 800  ax-11 801  ax-12 802  ax-16 922  ax-17 925  ax-ext 1074
This theorem depends on definitions:  df-bi 128  df-or 197  df-an 198  df-ex 679  df-sb 853  df-eu 1009  df-clab 1093  df-cleq 1097  df-clel 1099  df-ral 1205  df-v 1349  df-in 1491
metamath.org