MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  mreexexd Structured version   Visualization version   GIF version

Theorem mreexexd 17357
Description: Exchange-type theorem. In a Moore system whose closure operator has the exchange property, if 𝐹 and 𝐺 are disjoint from 𝐻, (𝐹𝐻) is independent, 𝐹 is contained in the closure of (𝐺𝐻), and either 𝐹 or 𝐺 is finite, then there is a subset 𝑞 of 𝐺 equinumerous to 𝐹 such that (𝑞𝐻) is independent. This implies the case of Proposition 4.2.1 in [FaureFrolicher] p. 86 where either (𝐴𝐵) or (𝐵𝐴) is finite. The theorem is proven by induction using mreexexlem3d 17355 for the base case and mreexexlem4d 17356 for the induction step. (Contributed by David Moews, 1-May-2017.) Remove dependencies on ax-rep 5209 and ax-ac2 10219. (Revised by Brendan Leahy, 2-Jun-2021.)
Hypotheses
Ref Expression
mreexexlem2d.1 (𝜑𝐴 ∈ (Moore‘𝑋))
mreexexlem2d.2 𝑁 = (mrCls‘𝐴)
mreexexlem2d.3 𝐼 = (mrInd‘𝐴)
mreexexlem2d.4 (𝜑 → ∀𝑠 ∈ 𝒫 𝑋𝑦𝑋𝑧 ∈ ((𝑁‘(𝑠 ∪ {𝑦})) ∖ (𝑁𝑠))𝑦 ∈ (𝑁‘(𝑠 ∪ {𝑧})))
mreexexlem2d.5 (𝜑𝐹 ⊆ (𝑋𝐻))
mreexexlem2d.6 (𝜑𝐺 ⊆ (𝑋𝐻))
mreexexlem2d.7 (𝜑𝐹 ⊆ (𝑁‘(𝐺𝐻)))
mreexexlem2d.8 (𝜑 → (𝐹𝐻) ∈ 𝐼)
mreexexd.9 (𝜑 → (𝐹 ∈ Fin ∨ 𝐺 ∈ Fin))
Assertion
Ref Expression
mreexexd (𝜑 → ∃𝑞 ∈ 𝒫 𝐺(𝐹𝑞 ∧ (𝑞𝐻) ∈ 𝐼))
Distinct variable groups:   𝐹,𝑞   𝐺,𝑞   𝑋,𝑠,𝑦,𝑧   𝜑,𝑠,𝑦,𝑧   𝐼,𝑠,𝑦,𝑧   𝑁,𝑠,𝑦,𝑧   𝜑,𝑞   𝐼,𝑞   𝐻,𝑞
Allowed substitution hints:   𝐴(𝑦,𝑧,𝑠,𝑞)   𝐹(𝑦,𝑧,𝑠)   𝐺(𝑦,𝑧,𝑠)   𝐻(𝑦,𝑧,𝑠)   𝑁(𝑞)   𝑋(𝑞)

Proof of Theorem mreexexd
Dummy variables 𝑓 𝑔 𝑙 𝑘 𝑖 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 mreexexlem2d.1 . . 3 (𝜑𝐴 ∈ (Moore‘𝑋))
21elfvexd 6808 . 2 (𝜑𝑋 ∈ V)
3 mreexexlem2d.5 . 2 (𝜑𝐹 ⊆ (𝑋𝐻))
4 mreexexlem2d.6 . 2 (𝜑𝐺 ⊆ (𝑋𝐻))
5 mreexexlem2d.7 . 2 (𝜑𝐹 ⊆ (𝑁‘(𝐺𝐻)))
6 mreexexlem2d.8 . 2 (𝜑 → (𝐹𝐻) ∈ 𝐼)
7 exmid 892 . . 3 (𝐹 ∈ Fin ∨ ¬ 𝐹 ∈ Fin)
8 ficardid 9720 . . . . . . 7 (𝐹 ∈ Fin → (card‘𝐹) ≈ 𝐹)
98ensymd 8791 . . . . . 6 (𝐹 ∈ Fin → 𝐹 ≈ (card‘𝐹))
10 iftrue 4465 . . . . . 6 (𝐹 ∈ Fin → if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) = (card‘𝐹))
119, 10breqtrrd 5102 . . . . 5 (𝐹 ∈ Fin → 𝐹 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)))
1211a1i 11 . . . 4 (𝜑 → (𝐹 ∈ Fin → 𝐹 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺))))
13 mreexexd.9 . . . . . . . 8 (𝜑 → (𝐹 ∈ Fin ∨ 𝐺 ∈ Fin))
1413orcanai 1000 . . . . . . 7 ((𝜑 ∧ ¬ 𝐹 ∈ Fin) → 𝐺 ∈ Fin)
15 ficardid 9720 . . . . . . . 8 (𝐺 ∈ Fin → (card‘𝐺) ≈ 𝐺)
1615ensymd 8791 . . . . . . 7 (𝐺 ∈ Fin → 𝐺 ≈ (card‘𝐺))
1714, 16syl 17 . . . . . 6 ((𝜑 ∧ ¬ 𝐹 ∈ Fin) → 𝐺 ≈ (card‘𝐺))
18 iffalse 4468 . . . . . . 7 𝐹 ∈ Fin → if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) = (card‘𝐺))
1918adantl 482 . . . . . 6 ((𝜑 ∧ ¬ 𝐹 ∈ Fin) → if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) = (card‘𝐺))
2017, 19breqtrrd 5102 . . . . 5 ((𝜑 ∧ ¬ 𝐹 ∈ Fin) → 𝐺 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)))
2120ex 413 . . . 4 (𝜑 → (¬ 𝐹 ∈ Fin → 𝐺 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺))))
2212, 21orim12d 962 . . 3 (𝜑 → ((𝐹 ∈ Fin ∨ ¬ 𝐹 ∈ Fin) → (𝐹 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) ∨ 𝐺 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)))))
237, 22mpi 20 . 2 (𝜑 → (𝐹 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) ∨ 𝐺 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺))))
24 ficardom 9719 . . . . 5 (𝐹 ∈ Fin → (card‘𝐹) ∈ ω)
2524adantl 482 . . . 4 ((𝜑𝐹 ∈ Fin) → (card‘𝐹) ∈ ω)
26 ficardom 9719 . . . . 5 (𝐺 ∈ Fin → (card‘𝐺) ∈ ω)
2714, 26syl 17 . . . 4 ((𝜑 ∧ ¬ 𝐹 ∈ Fin) → (card‘𝐺) ∈ ω)
2825, 27ifclda 4494 . . 3 (𝜑 → if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) ∈ ω)
29 breq2 5078 . . . . . . . . . 10 (𝑙 = ∅ → (𝑓𝑙𝑓 ≈ ∅))
30 breq2 5078 . . . . . . . . . 10 (𝑙 = ∅ → (𝑔𝑙𝑔 ≈ ∅))
3129, 30orbi12d 916 . . . . . . . . 9 (𝑙 = ∅ → ((𝑓𝑙𝑔𝑙) ↔ (𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅)))
32313anbi1d 1439 . . . . . . . 8 (𝑙 = ∅ → (((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) ↔ ((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)))
3332imbi1d 342 . . . . . . 7 (𝑙 = ∅ → ((((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)) ↔ (((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))))
34332ralbidv 3129 . . . . . 6 (𝑙 = ∅ → (∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)) ↔ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))))
3534albidv 1923 . . . . 5 (𝑙 = ∅ → (∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)) ↔ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))))
3635imbi2d 341 . . . 4 (𝑙 = ∅ → ((𝜑 → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ↔ (𝜑 → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))))
37 breq2 5078 . . . . . . . . . 10 (𝑙 = 𝑘 → (𝑓𝑙𝑓𝑘))
38 breq2 5078 . . . . . . . . . 10 (𝑙 = 𝑘 → (𝑔𝑙𝑔𝑘))
3937, 38orbi12d 916 . . . . . . . . 9 (𝑙 = 𝑘 → ((𝑓𝑙𝑔𝑙) ↔ (𝑓𝑘𝑔𝑘)))
40393anbi1d 1439 . . . . . . . 8 (𝑙 = 𝑘 → (((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) ↔ ((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)))
4140imbi1d 342 . . . . . . 7 (𝑙 = 𝑘 → ((((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)) ↔ (((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))))
42412ralbidv 3129 . . . . . 6 (𝑙 = 𝑘 → (∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)) ↔ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))))
4342albidv 1923 . . . . 5 (𝑙 = 𝑘 → (∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)) ↔ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))))
4443imbi2d 341 . . . 4 (𝑙 = 𝑘 → ((𝜑 → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ↔ (𝜑 → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))))
45 breq2 5078 . . . . . . . . . 10 (𝑙 = suc 𝑘 → (𝑓𝑙𝑓 ≈ suc 𝑘))
46 breq2 5078 . . . . . . . . . 10 (𝑙 = suc 𝑘 → (𝑔𝑙𝑔 ≈ suc 𝑘))
4745, 46orbi12d 916 . . . . . . . . 9 (𝑙 = suc 𝑘 → ((𝑓𝑙𝑔𝑙) ↔ (𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘)))
48473anbi1d 1439 . . . . . . . 8 (𝑙 = suc 𝑘 → (((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) ↔ ((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)))
4948imbi1d 342 . . . . . . 7 (𝑙 = suc 𝑘 → ((((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)) ↔ (((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))))
50492ralbidv 3129 . . . . . 6 (𝑙 = suc 𝑘 → (∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)) ↔ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))))
5150albidv 1923 . . . . 5 (𝑙 = suc 𝑘 → (∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)) ↔ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))))
5251imbi2d 341 . . . 4 (𝑙 = suc 𝑘 → ((𝜑 → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ↔ (𝜑 → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))))
53 breq2 5078 . . . . . . . . . 10 (𝑙 = if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) → (𝑓𝑙𝑓 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺))))
54 breq2 5078 . . . . . . . . . 10 (𝑙 = if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) → (𝑔𝑙𝑔 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺))))
5553, 54orbi12d 916 . . . . . . . . 9 (𝑙 = if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) → ((𝑓𝑙𝑔𝑙) ↔ (𝑓 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) ∨ 𝑔 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)))))
56553anbi1d 1439 . . . . . . . 8 (𝑙 = if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) → (((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) ↔ ((𝑓 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) ∨ 𝑔 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺))) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)))
5756imbi1d 342 . . . . . . 7 (𝑙 = if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) → ((((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)) ↔ (((𝑓 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) ∨ 𝑔 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺))) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))))
58572ralbidv 3129 . . . . . 6 (𝑙 = if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) → (∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)) ↔ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) ∨ 𝑔 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺))) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))))
5958albidv 1923 . . . . 5 (𝑙 = if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) → (∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)) ↔ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) ∨ 𝑔 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺))) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))))
6059imbi2d 341 . . . 4 (𝑙 = if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) → ((𝜑 → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ↔ (𝜑 → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) ∨ 𝑔 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺))) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))))
611ad2antrr 723 . . . . . . . 8 (((𝜑 ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → 𝐴 ∈ (Moore‘𝑋))
62 mreexexlem2d.2 . . . . . . . 8 𝑁 = (mrCls‘𝐴)
63 mreexexlem2d.3 . . . . . . . 8 𝐼 = (mrInd‘𝐴)
64 mreexexlem2d.4 . . . . . . . . 9 (𝜑 → ∀𝑠 ∈ 𝒫 𝑋𝑦𝑋𝑧 ∈ ((𝑁‘(𝑠 ∪ {𝑦})) ∖ (𝑁𝑠))𝑦 ∈ (𝑁‘(𝑠 ∪ {𝑧})))
6564ad2antrr 723 . . . . . . . 8 (((𝜑 ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → ∀𝑠 ∈ 𝒫 𝑋𝑦𝑋𝑧 ∈ ((𝑁‘(𝑠 ∪ {𝑦})) ∖ (𝑁𝑠))𝑦 ∈ (𝑁‘(𝑠 ∪ {𝑧})))
66 simplrl 774 . . . . . . . . 9 (((𝜑 ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → 𝑓 ∈ 𝒫 (𝑋))
6766elpwid 4544 . . . . . . . 8 (((𝜑 ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → 𝑓 ⊆ (𝑋))
68 simplrr 775 . . . . . . . . 9 (((𝜑 ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → 𝑔 ∈ 𝒫 (𝑋))
6968elpwid 4544 . . . . . . . 8 (((𝜑 ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → 𝑔 ⊆ (𝑋))
70 simpr2 1194 . . . . . . . 8 (((𝜑 ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → 𝑓 ⊆ (𝑁‘(𝑔)))
71 simpr3 1195 . . . . . . . 8 (((𝜑 ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → (𝑓) ∈ 𝐼)
72 simpr1 1193 . . . . . . . . 9 (((𝜑 ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → (𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅))
73 en0 8803 . . . . . . . . . 10 (𝑓 ≈ ∅ ↔ 𝑓 = ∅)
74 en0 8803 . . . . . . . . . 10 (𝑔 ≈ ∅ ↔ 𝑔 = ∅)
7573, 74orbi12i 912 . . . . . . . . 9 ((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ↔ (𝑓 = ∅ ∨ 𝑔 = ∅))
7672, 75sylib 217 . . . . . . . 8 (((𝜑 ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → (𝑓 = ∅ ∨ 𝑔 = ∅))
7761, 62, 63, 65, 67, 69, 70, 71, 76mreexexlem3d 17355 . . . . . . 7 (((𝜑 ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))
7877ex 413 . . . . . 6 ((𝜑 ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) → (((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))
7978ralrimivva 3123 . . . . 5 (𝜑 → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))
8079alrimiv 1930 . . . 4 (𝜑 → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))
81 nfv 1917 . . . . . . . . 9 𝜑
82 nfv 1917 . . . . . . . . 9 𝑘 ∈ ω
83 nfa1 2148 . . . . . . . . 9 𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))
8481, 82, 83nf3an 1904 . . . . . . . 8 (𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))
85 nfv 1917 . . . . . . . . . 10 𝑓𝜑
86 nfv 1917 . . . . . . . . . 10 𝑓 𝑘 ∈ ω
87 nfra1 3144 . . . . . . . . . . 11 𝑓𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))
8887nfal 2317 . . . . . . . . . 10 𝑓𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))
8985, 86, 88nf3an 1904 . . . . . . . . 9 𝑓(𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))
90 nfv 1917 . . . . . . . . . . . . 13 𝑔𝜑
91 nfv 1917 . . . . . . . . . . . . 13 𝑔 𝑘 ∈ ω
92 nfra2w 3154 . . . . . . . . . . . . . 14 𝑔𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))
9392nfal 2317 . . . . . . . . . . . . 13 𝑔𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))
9490, 91, 93nf3an 1904 . . . . . . . . . . . 12 𝑔(𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))
95 nfv 1917 . . . . . . . . . . . 12 𝑔 𝑓 ∈ 𝒫 (𝑋)
9694, 95nfan 1902 . . . . . . . . . . 11 𝑔((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ∧ 𝑓 ∈ 𝒫 (𝑋))
9713ad2ant1 1132 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) → 𝐴 ∈ (Moore‘𝑋))
9897ad2antrr 723 . . . . . . . . . . . . . 14 ((((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → 𝐴 ∈ (Moore‘𝑋))
99643ad2ant1 1132 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) → ∀𝑠 ∈ 𝒫 𝑋𝑦𝑋𝑧 ∈ ((𝑁‘(𝑠 ∪ {𝑦})) ∖ (𝑁𝑠))𝑦 ∈ (𝑁‘(𝑠 ∪ {𝑧})))
10099ad2antrr 723 . . . . . . . . . . . . . 14 ((((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → ∀𝑠 ∈ 𝒫 𝑋𝑦𝑋𝑧 ∈ ((𝑁‘(𝑠 ∪ {𝑦})) ∖ (𝑁𝑠))𝑦 ∈ (𝑁‘(𝑠 ∪ {𝑧})))
101 simplrl 774 . . . . . . . . . . . . . . 15 ((((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → 𝑓 ∈ 𝒫 (𝑋))
102101elpwid 4544 . . . . . . . . . . . . . 14 ((((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → 𝑓 ⊆ (𝑋))
103 simplrr 775 . . . . . . . . . . . . . . 15 ((((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → 𝑔 ∈ 𝒫 (𝑋))
104103elpwid 4544 . . . . . . . . . . . . . 14 ((((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → 𝑔 ⊆ (𝑋))
105 simpr2 1194 . . . . . . . . . . . . . 14 ((((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → 𝑓 ⊆ (𝑁‘(𝑔)))
106 simpr3 1195 . . . . . . . . . . . . . 14 ((((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → (𝑓) ∈ 𝐼)
107 simpll2 1212 . . . . . . . . . . . . . 14 ((((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → 𝑘 ∈ ω)
108 simpll3 1213 . . . . . . . . . . . . . 14 ((((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))
109 simpr1 1193 . . . . . . . . . . . . . 14 ((((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → (𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘))
11098, 62, 63, 100, 102, 104, 105, 106, 107, 108, 109mreexexlem4d 17356 . . . . . . . . . . . . 13 ((((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))
111110ex 413 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) → (((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))
112111expr 457 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ∧ 𝑓 ∈ 𝒫 (𝑋)) → (𝑔 ∈ 𝒫 (𝑋) → (((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))))
11396, 112ralrimi 3141 . . . . . . . . . 10 (((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ∧ 𝑓 ∈ 𝒫 (𝑋)) → ∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))
114113ex 413 . . . . . . . . 9 ((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) → (𝑓 ∈ 𝒫 (𝑋) → ∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))))
11589, 114ralrimi 3141 . . . . . . . 8 ((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))
11684, 115alrimi 2206 . . . . . . 7 ((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))
1171163exp 1118 . . . . . 6 (𝜑 → (𝑘 ∈ ω → (∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)) → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))))
118117com12 32 . . . . 5 (𝑘 ∈ ω → (𝜑 → (∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)) → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))))
119118a2d 29 . . . 4 (𝑘 ∈ ω → ((𝜑 → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) → (𝜑 → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))))
12036, 44, 52, 60, 80, 119finds 7745 . . 3 (if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) ∈ ω → (𝜑 → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) ∨ 𝑔 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺))) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))))
12128, 120mpcom 38 . 2 (𝜑 → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) ∨ 𝑔 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺))) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))
1222, 3, 4, 5, 6, 23, 121mreexexlemd 17353 1 (𝜑 → ∃𝑞 ∈ 𝒫 𝐺(𝐹𝑞 ∧ (𝑞𝐻) ∈ 𝐼))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 396  wo 844  w3a 1086  wal 1537   = wceq 1539  wcel 2106  wral 3064  wrex 3065  Vcvv 3432  cdif 3884  cun 3885  wss 3887  c0 4256  ifcif 4459  𝒫 cpw 4533  {csn 4561   class class class wbr 5074  suc csuc 6268  cfv 6433  ωcom 7712  cen 8730  Fincfn 8733  cardccrd 9693  Moorecmre 17291  mrClscmrc 17292  mrIndcmri 17293
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2709  ax-sep 5223  ax-nul 5230  ax-pow 5288  ax-pr 5352  ax-un 7588
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-3or 1087  df-3an 1088  df-tru 1542  df-fal 1552  df-ex 1783  df-nf 1787  df-sb 2068  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2816  df-nfc 2889  df-ne 2944  df-ral 3069  df-rex 3070  df-reu 3072  df-rab 3073  df-v 3434  df-sbc 3717  df-csb 3833  df-dif 3890  df-un 3892  df-in 3894  df-ss 3904  df-pss 3906  df-nul 4257  df-if 4460  df-pw 4535  df-sn 4562  df-pr 4564  df-op 4568  df-uni 4840  df-int 4880  df-br 5075  df-opab 5137  df-mpt 5158  df-tr 5192  df-id 5489  df-eprel 5495  df-po 5503  df-so 5504  df-fr 5544  df-we 5546  df-xp 5595  df-rel 5596  df-cnv 5597  df-co 5598  df-dm 5599  df-rn 5600  df-res 5601  df-ima 5602  df-ord 6269  df-on 6270  df-lim 6271  df-suc 6272  df-iota 6391  df-fun 6435  df-fn 6436  df-f 6437  df-f1 6438  df-fo 6439  df-f1o 6440  df-fv 6441  df-om 7713  df-1o 8297  df-er 8498  df-en 8734  df-dom 8735  df-sdom 8736  df-fin 8737  df-card 9697  df-mre 17295  df-mrc 17296  df-mri 17297
This theorem is referenced by:  mreexdomd  17358  lindsdom  35771  aacllem  46505
  Copyright terms: Public domain W3C validator