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

Theorem mreexexd 17614
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 17612 for the base case and mreexexlem4d 17613 for the induction step. (Contributed by David Moews, 1-May-2017.) Remove dependencies on ax-rep 5212 and ax-ac2 10385. (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 6876 . 2 (𝜑𝑋 ∈ V)
3 mreexexlem2d.5 . 2 (𝜑𝐹 ⊆ (𝑋𝐻))
4 mreexexlem2d.6 . 2 (𝜑𝐺 ⊆ (𝑋𝐻))
5 mreexexlem2d.7 . 2 (𝜑𝐹 ⊆ (𝑁‘(𝐺𝐻)))
6 mreexexlem2d.8 . 2 (𝜑 → (𝐹𝐻) ∈ 𝐼)
7 exmid 895 . . 3 (𝐹 ∈ Fin ∨ ¬ 𝐹 ∈ Fin)
8 ficardid 9886 . . . . . . 7 (𝐹 ∈ Fin → (card‘𝐹) ≈ 𝐹)
98ensymd 8952 . . . . . 6 (𝐹 ∈ Fin → 𝐹 ≈ (card‘𝐹))
10 iftrue 4472 . . . . . 6 (𝐹 ∈ Fin → if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) = (card‘𝐹))
119, 10breqtrrd 5113 . . . . 5 (𝐹 ∈ Fin → 𝐹 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)))
1211a1i 11 . . . 4 (𝜑 → (𝐹 ∈ Fin → 𝐹 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺))))
13 mreexexd.9 . . . . . . . 8 (𝜑 → (𝐹 ∈ Fin ∨ 𝐺 ∈ Fin))
1413orcanai 1005 . . . . . . 7 ((𝜑 ∧ ¬ 𝐹 ∈ Fin) → 𝐺 ∈ Fin)
15 ficardid 9886 . . . . . . . 8 (𝐺 ∈ Fin → (card‘𝐺) ≈ 𝐺)
1615ensymd 8952 . . . . . . 7 (𝐺 ∈ Fin → 𝐺 ≈ (card‘𝐺))
1714, 16syl 17 . . . . . 6 ((𝜑 ∧ ¬ 𝐹 ∈ Fin) → 𝐺 ≈ (card‘𝐺))
18 iffalse 4475 . . . . . . 7 𝐹 ∈ Fin → if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) = (card‘𝐺))
1918adantl 481 . . . . . 6 ((𝜑 ∧ ¬ 𝐹 ∈ Fin) → if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) = (card‘𝐺))
2017, 19breqtrrd 5113 . . . . 5 ((𝜑 ∧ ¬ 𝐹 ∈ Fin) → 𝐺 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)))
2120ex 412 . . . 4 (𝜑 → (¬ 𝐹 ∈ Fin → 𝐺 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺))))
2212, 21orim12d 967 . . 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 9885 . . . . 5 (𝐹 ∈ Fin → (card‘𝐹) ∈ ω)
2524adantl 481 . . . 4 ((𝜑𝐹 ∈ Fin) → (card‘𝐹) ∈ ω)
26 ficardom 9885 . . . . 5 (𝐺 ∈ Fin → (card‘𝐺) ∈ ω)
2714, 26syl 17 . . . 4 ((𝜑 ∧ ¬ 𝐹 ∈ Fin) → (card‘𝐺) ∈ ω)
2825, 27ifclda 4502 . . 3 (𝜑 → if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) ∈ ω)
29 breq2 5089 . . . . . . . . . 10 (𝑙 = ∅ → (𝑓𝑙𝑓 ≈ ∅))
30 breq2 5089 . . . . . . . . . 10 (𝑙 = ∅ → (𝑔𝑙𝑔 ≈ ∅))
3129, 30orbi12d 919 . . . . . . . . 9 (𝑙 = ∅ → ((𝑓𝑙𝑔𝑙) ↔ (𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅)))
32313anbi1d 1443 . . . . . . . 8 (𝑙 = ∅ → (((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) ↔ ((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)))
3332imbi1d 341 . . . . . . 7 (𝑙 = ∅ → ((((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)) ↔ (((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))))
34332ralbidv 3201 . . . . . 6 (𝑙 = ∅ → (∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)) ↔ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))))
3534albidv 1922 . . . . 5 (𝑙 = ∅ → (∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)) ↔ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))))
3635imbi2d 340 . . . 4 (𝑙 = ∅ → ((𝜑 → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ↔ (𝜑 → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))))
37 breq2 5089 . . . . . . . . . 10 (𝑙 = 𝑘 → (𝑓𝑙𝑓𝑘))
38 breq2 5089 . . . . . . . . . 10 (𝑙 = 𝑘 → (𝑔𝑙𝑔𝑘))
3937, 38orbi12d 919 . . . . . . . . 9 (𝑙 = 𝑘 → ((𝑓𝑙𝑔𝑙) ↔ (𝑓𝑘𝑔𝑘)))
40393anbi1d 1443 . . . . . . . 8 (𝑙 = 𝑘 → (((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) ↔ ((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)))
4140imbi1d 341 . . . . . . 7 (𝑙 = 𝑘 → ((((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)) ↔ (((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))))
42412ralbidv 3201 . . . . . 6 (𝑙 = 𝑘 → (∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)) ↔ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))))
4342albidv 1922 . . . . 5 (𝑙 = 𝑘 → (∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)) ↔ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))))
4443imbi2d 340 . . . 4 (𝑙 = 𝑘 → ((𝜑 → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ↔ (𝜑 → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))))
45 breq2 5089 . . . . . . . . . 10 (𝑙 = suc 𝑘 → (𝑓𝑙𝑓 ≈ suc 𝑘))
46 breq2 5089 . . . . . . . . . 10 (𝑙 = suc 𝑘 → (𝑔𝑙𝑔 ≈ suc 𝑘))
4745, 46orbi12d 919 . . . . . . . . 9 (𝑙 = suc 𝑘 → ((𝑓𝑙𝑔𝑙) ↔ (𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘)))
48473anbi1d 1443 . . . . . . . 8 (𝑙 = suc 𝑘 → (((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) ↔ ((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)))
4948imbi1d 341 . . . . . . 7 (𝑙 = suc 𝑘 → ((((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)) ↔ (((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))))
50492ralbidv 3201 . . . . . 6 (𝑙 = suc 𝑘 → (∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)) ↔ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))))
5150albidv 1922 . . . . 5 (𝑙 = suc 𝑘 → (∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)) ↔ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))))
5251imbi2d 340 . . . 4 (𝑙 = suc 𝑘 → ((𝜑 → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ↔ (𝜑 → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))))
53 breq2 5089 . . . . . . . . . 10 (𝑙 = if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) → (𝑓𝑙𝑓 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺))))
54 breq2 5089 . . . . . . . . . 10 (𝑙 = if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) → (𝑔𝑙𝑔 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺))))
5553, 54orbi12d 919 . . . . . . . . 9 (𝑙 = if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) → ((𝑓𝑙𝑔𝑙) ↔ (𝑓 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) ∨ 𝑔 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)))))
56553anbi1d 1443 . . . . . . . 8 (𝑙 = if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) → (((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) ↔ ((𝑓 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) ∨ 𝑔 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺))) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)))
5756imbi1d 341 . . . . . . 7 (𝑙 = if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) → ((((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)) ↔ (((𝑓 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) ∨ 𝑔 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺))) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))))
58572ralbidv 3201 . . . . . 6 (𝑙 = if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) → (∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)) ↔ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) ∨ 𝑔 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺))) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))))
5958albidv 1922 . . . . 5 (𝑙 = if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) → (∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)) ↔ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) ∨ 𝑔 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺))) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))))
6059imbi2d 340 . . . 4 (𝑙 = if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) → ((𝜑 → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑙𝑔𝑙) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ↔ (𝜑 → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺)) ∨ 𝑔 ≈ if(𝐹 ∈ Fin, (card‘𝐹), (card‘𝐺))) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))))
611ad2antrr 727 . . . . . . . 8 (((𝜑 ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → 𝐴 ∈ (Moore‘𝑋))
62 mreexexlem2d.2 . . . . . . . 8 𝑁 = (mrCls‘𝐴)
63 mreexexlem2d.3 . . . . . . . 8 𝐼 = (mrInd‘𝐴)
64 mreexexlem2d.4 . . . . . . . . 9 (𝜑 → ∀𝑠 ∈ 𝒫 𝑋𝑦𝑋𝑧 ∈ ((𝑁‘(𝑠 ∪ {𝑦})) ∖ (𝑁𝑠))𝑦 ∈ (𝑁‘(𝑠 ∪ {𝑧})))
6564ad2antrr 727 . . . . . . . 8 (((𝜑 ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → ∀𝑠 ∈ 𝒫 𝑋𝑦𝑋𝑧 ∈ ((𝑁‘(𝑠 ∪ {𝑦})) ∖ (𝑁𝑠))𝑦 ∈ (𝑁‘(𝑠 ∪ {𝑧})))
66 simplrl 777 . . . . . . . . 9 (((𝜑 ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → 𝑓 ∈ 𝒫 (𝑋))
6766elpwid 4550 . . . . . . . 8 (((𝜑 ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → 𝑓 ⊆ (𝑋))
68 simplrr 778 . . . . . . . . 9 (((𝜑 ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → 𝑔 ∈ 𝒫 (𝑋))
6968elpwid 4550 . . . . . . . 8 (((𝜑 ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → 𝑔 ⊆ (𝑋))
70 simpr2 1197 . . . . . . . 8 (((𝜑 ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → 𝑓 ⊆ (𝑁‘(𝑔)))
71 simpr3 1198 . . . . . . . 8 (((𝜑 ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → (𝑓) ∈ 𝐼)
72 simpr1 1196 . . . . . . . . 9 (((𝜑 ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → (𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅))
73 en0 8965 . . . . . . . . . 10 (𝑓 ≈ ∅ ↔ 𝑓 = ∅)
74 en0 8965 . . . . . . . . . 10 (𝑔 ≈ ∅ ↔ 𝑔 = ∅)
7573, 74orbi12i 915 . . . . . . . . 9 ((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ↔ (𝑓 = ∅ ∨ 𝑔 = ∅))
7672, 75sylib 218 . . . . . . . 8 (((𝜑 ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → (𝑓 = ∅ ∨ 𝑔 = ∅))
7761, 62, 63, 65, 67, 69, 70, 71, 76mreexexlem3d 17612 . . . . . . 7 (((𝜑 ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))
7877ex 412 . . . . . 6 ((𝜑 ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) → (((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))
7978ralrimivva 3180 . . . . 5 (𝜑 → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))
8079alrimiv 1929 . . . 4 (𝜑 → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ ∅ ∨ 𝑔 ≈ ∅) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))
81 nfv 1916 . . . . . . . . 9 𝜑
82 nfv 1916 . . . . . . . . 9 𝑘 ∈ ω
83 nfa1 2157 . . . . . . . . 9 𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))
8481, 82, 83nf3an 1903 . . . . . . . 8 (𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))
85 nfv 1916 . . . . . . . . . 10 𝑓𝜑
86 nfv 1916 . . . . . . . . . 10 𝑓 𝑘 ∈ ω
87 nfra1 3261 . . . . . . . . . . 11 𝑓𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))
8887nfal 2328 . . . . . . . . . 10 𝑓𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))
8985, 86, 88nf3an 1903 . . . . . . . . 9 𝑓(𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))
90 nfv 1916 . . . . . . . . . . . . 13 𝑔𝜑
91 nfv 1916 . . . . . . . . . . . . 13 𝑔 𝑘 ∈ ω
92 nfra2w 3273 . . . . . . . . . . . . . 14 𝑔𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))
9392nfal 2328 . . . . . . . . . . . . 13 𝑔𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))
9490, 91, 93nf3an 1903 . . . . . . . . . . . 12 𝑔(𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))
95 nfv 1916 . . . . . . . . . . . 12 𝑔 𝑓 ∈ 𝒫 (𝑋)
9694, 95nfan 1901 . . . . . . . . . . 11 𝑔((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ∧ 𝑓 ∈ 𝒫 (𝑋))
9713ad2ant1 1134 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) → 𝐴 ∈ (Moore‘𝑋))
9897ad2antrr 727 . . . . . . . . . . . . . 14 ((((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → 𝐴 ∈ (Moore‘𝑋))
99643ad2ant1 1134 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) → ∀𝑠 ∈ 𝒫 𝑋𝑦𝑋𝑧 ∈ ((𝑁‘(𝑠 ∪ {𝑦})) ∖ (𝑁𝑠))𝑦 ∈ (𝑁‘(𝑠 ∪ {𝑧})))
10099ad2antrr 727 . . . . . . . . . . . . . 14 ((((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → ∀𝑠 ∈ 𝒫 𝑋𝑦𝑋𝑧 ∈ ((𝑁‘(𝑠 ∪ {𝑦})) ∖ (𝑁𝑠))𝑦 ∈ (𝑁‘(𝑠 ∪ {𝑧})))
101 simplrl 777 . . . . . . . . . . . . . . 15 ((((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → 𝑓 ∈ 𝒫 (𝑋))
102101elpwid 4550 . . . . . . . . . . . . . 14 ((((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → 𝑓 ⊆ (𝑋))
103 simplrr 778 . . . . . . . . . . . . . . 15 ((((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → 𝑔 ∈ 𝒫 (𝑋))
104103elpwid 4550 . . . . . . . . . . . . . 14 ((((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → 𝑔 ⊆ (𝑋))
105 simpr2 1197 . . . . . . . . . . . . . 14 ((((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → 𝑓 ⊆ (𝑁‘(𝑔)))
106 simpr3 1198 . . . . . . . . . . . . . 14 ((((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → (𝑓) ∈ 𝐼)
107 simpll2 1215 . . . . . . . . . . . . . 14 ((((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → 𝑘 ∈ ω)
108 simpll3 1216 . . . . . . . . . . . . . 14 ((((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))
109 simpr1 1196 . . . . . . . . . . . . . 14 ((((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → (𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘))
11098, 62, 63, 100, 102, 104, 105, 106, 107, 108, 109mreexexlem4d 17613 . . . . . . . . . . . . 13 ((((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) ∧ ((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼)) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))
111110ex 412 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ∧ (𝑓 ∈ 𝒫 (𝑋) ∧ 𝑔 ∈ 𝒫 (𝑋))) → (((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))
112111expr 456 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ∧ 𝑓 ∈ 𝒫 (𝑋)) → (𝑔 ∈ 𝒫 (𝑋) → (((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))))
11396, 112ralrimi 3235 . . . . . . . . . 10 (((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) ∧ 𝑓 ∈ 𝒫 (𝑋)) → ∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))
114113ex 412 . . . . . . . . 9 ((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) → (𝑓 ∈ 𝒫 (𝑋) → ∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))))
11589, 114ralrimi 3235 . . . . . . . 8 ((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))
11684, 115alrimi 2221 . . . . . . 7 ((𝜑𝑘 ∈ ω ∧ ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))
1171163exp 1120 . . . . . 6 (𝜑 → (𝑘 ∈ ω → (∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)) → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))))
118117com12 32 . . . . 5 (𝑘 ∈ ω → (𝜑 → (∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)) → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))))
119118a2d 29 . . . 4 (𝑘 ∈ ω → ((𝜑 → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓𝑘𝑔𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼))) → (𝜑 → ∀𝑓 ∈ 𝒫 (𝑋)∀𝑔 ∈ 𝒫 (𝑋)(((𝑓 ≈ suc 𝑘𝑔 ≈ suc 𝑘) ∧ 𝑓 ⊆ (𝑁‘(𝑔)) ∧ (𝑓) ∈ 𝐼) → ∃𝑖 ∈ 𝒫 𝑔(𝑓𝑖 ∧ (𝑖) ∈ 𝐼)))))
12036, 44, 52, 60, 80, 119finds 7847 . . 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 17610 1 (𝜑 → ∃𝑞 ∈ 𝒫 𝐺(𝐹𝑞 ∧ (𝑞𝐻) ∈ 𝐼))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 395  wo 848  w3a 1087  wal 1540   = wceq 1542  wcel 2114  wral 3051  wrex 3061  Vcvv 3429  cdif 3886  cun 3887  wss 3889  c0 4273  ifcif 4466  𝒫 cpw 4541  {csn 4567   class class class wbr 5085  suc csuc 6325  cfv 6498  ωcom 7817  cen 8890  Fincfn 8893  cardccrd 9859  Moorecmre 17544  mrClscmrc 17545  mrIndcmri 17546
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2708  ax-sep 5231  ax-nul 5241  ax-pow 5307  ax-pr 5375  ax-un 7689
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2539  df-eu 2569  df-clab 2715  df-cleq 2728  df-clel 2811  df-nfc 2885  df-ne 2933  df-ral 3052  df-rex 3062  df-reu 3343  df-rab 3390  df-v 3431  df-sbc 3729  df-csb 3838  df-dif 3892  df-un 3894  df-in 3896  df-ss 3906  df-pss 3909  df-nul 4274  df-if 4467  df-pw 4543  df-sn 4568  df-pr 4570  df-op 4574  df-uni 4851  df-int 4890  df-br 5086  df-opab 5148  df-mpt 5167  df-tr 5193  df-id 5526  df-eprel 5531  df-po 5539  df-so 5540  df-fr 5584  df-we 5586  df-xp 5637  df-rel 5638  df-cnv 5639  df-co 5640  df-dm 5641  df-rn 5642  df-res 5643  df-ima 5644  df-ord 6326  df-on 6327  df-lim 6328  df-suc 6329  df-iota 6454  df-fun 6500  df-fn 6501  df-f 6502  df-f1 6503  df-fo 6504  df-f1o 6505  df-fv 6506  df-om 7818  df-1o 8405  df-er 8643  df-en 8894  df-dom 8895  df-sdom 8896  df-fin 8897  df-card 9863  df-mre 17548  df-mrc 17549  df-mri 17550
This theorem is referenced by:  mreexdomd  17615  lindsdom  37935  aacllem  50276
  Copyright terms: Public domain W3C validator