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

Theorem wuncval2 10750
Description: Our earlier expression for a containing weak universe is in fact the weak universe closure. (Contributed by Mario Carneiro, 2-Jan-2017.)
Hypotheses
Ref Expression
wuncval2.f 𝐹 = (rec((𝑧 ∈ V ↦ ((𝑧 𝑧) ∪ 𝑥𝑧 ({𝒫 𝑥, 𝑥} ∪ ran (𝑦𝑧 ↦ {𝑥, 𝑦})))), (𝐴 ∪ 1o)) ↾ ω)
wuncval2.u 𝑈 = ran 𝐹
Assertion
Ref Expression
wuncval2 (𝐴𝑉 → (wUniCl‘𝐴) = 𝑈)
Distinct variable groups:   𝑥,𝑦,𝑧   𝑥,𝐴,𝑦   𝑥,𝑉,𝑦
Allowed substitution hints:   𝐴(𝑧)   𝑈(𝑥, 𝑦, 𝑧)   𝐹(𝑥, 𝑦, 𝑧)   𝑉(𝑧)

Proof of Theorem wuncval2
Dummy variables 𝑣 𝑢 𝑤 𝑚 𝑛 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 wuncval2.f . . . 4 𝐹 = (rec((𝑧 ∈ V ↦ ((𝑧 𝑧) ∪ 𝑥𝑧 ({𝒫 𝑥, 𝑥} ∪ ran (𝑦𝑧 ↦ {𝑥, 𝑦})))), (𝐴 ∪ 1o)) ↾ ω)
2 wuncval2.u . . . 4 𝑈 = ran 𝐹
31, 2wunex2 10741 . . 3 (𝐴𝑉 → (𝑈 ∈ WUni ∧ 𝐴𝑈))
4 wuncss 10748 . . 3 ((𝑈 ∈ WUni ∧ 𝐴𝑈) → (wUniCl‘𝐴) ⊆ 𝑈)
53, 4syl 18 . 2 (𝐴𝑉 → (wUniCl‘𝐴) ⊆ 𝑈)
6 frfnom 8431 . . . . . 6 (rec((𝑧 ∈ V ↦ ((𝑧 𝑧) ∪ 𝑥𝑧 ({𝒫 𝑥, 𝑥} ∪ ran (𝑦𝑧 ↦ {𝑥, 𝑦})))), (𝐴 ∪ 1o)) ↾ ω) Fn ω
71fneq1i 6639 . . . . . 6 (𝐹 Fn ω ↔ (rec((𝑧 ∈ V ↦ ((𝑧 𝑧) ∪ 𝑥𝑧 ({𝒫 𝑥, 𝑥} ∪ ran (𝑦𝑧 ↦ {𝑥, 𝑦})))), (𝐴 ∪ 1o)) ↾ ω) Fn ω)
86, 7mpbir 234 . . . . 5 𝐹 Fn ω
9 fniunfv 7252 . . . . 5 (𝐹 Fn ω → 𝑚 ∈ ω (𝐹𝑚) = ran 𝐹)
108, 9ax-mp 5 . . . 4 𝑚 ∈ ω (𝐹𝑚) = ran 𝐹
112, 10eqtr4i 2792 . . 3 𝑈 = 𝑚 ∈ ω (𝐹𝑚)
12 fveq2 6888 . . . . . . . 8 (𝑚 = ∅ → (𝐹𝑚) = (𝐹‘∅))
1312sseq1d 3971 . . . . . . 7 (𝑚 = ∅ → ((𝐹𝑚) ⊆ (wUniCl‘𝐴) ↔ (𝐹‘∅) ⊆ (wUniCl‘𝐴)))
14 fveq2 6888 . . . . . . . 8 (𝑚 = 𝑛 → (𝐹𝑚) = (𝐹𝑛))
1514sseq1d 3971 . . . . . . 7 (𝑚 = 𝑛 → ((𝐹𝑚) ⊆ (wUniCl‘𝐴) ↔ (𝐹𝑛) ⊆ (wUniCl‘𝐴)))
16 fveq2 6888 . . . . . . . 8 (𝑚 = suc 𝑛 → (𝐹𝑚) = (𝐹‘suc 𝑛))
1716sseq1d 3971 . . . . . . 7 (𝑚 = suc 𝑛 → ((𝐹𝑚) ⊆ (wUniCl‘𝐴) ↔ (𝐹‘suc 𝑛) ⊆ (wUniCl‘𝐴)))
18 1on 8475 . . . . . . . . . 10 1o ∈ On
19 unexg 7754 . . . . . . . . . 10 ((𝐴𝑉 ∧ 1o ∈ On) → (𝐴 ∪ 1o) ∈ V)
2018, 19mpan2 704 . . . . . . . . 9 (𝐴𝑉 → (𝐴 ∪ 1o) ∈ V)
211fveq1i 6889 . . . . . . . . . 10 (𝐹‘∅) = ((rec((𝑧 ∈ V ↦ ((𝑧 𝑧) ∪ 𝑥𝑧 ({𝒫 𝑥, 𝑥} ∪ ran (𝑦𝑧 ↦ {𝑥, 𝑦})))), (𝐴 ∪ 1o)) ↾ ω)‘∅)
22 fr0g 8432 . . . . . . . . . 10 ((𝐴 ∪ 1o) ∈ V → ((rec((𝑧 ∈ V ↦ ((𝑧 𝑧) ∪ 𝑥𝑧 ({𝒫 𝑥, 𝑥} ∪ ran (𝑦𝑧 ↦ {𝑥, 𝑦})))), (𝐴 ∪ 1o)) ↾ ω)‘∅) = (𝐴 ∪ 1o))
2321, 22eqtrid 2813 . . . . . . . . 9 ((𝐴 ∪ 1o) ∈ V → (𝐹‘∅) = (𝐴 ∪ 1o))
2420, 23syl 18 . . . . . . . 8 (𝐴𝑉 → (𝐹‘∅) = (𝐴 ∪ 1o))
25 wuncid 10746 . . . . . . . . 9 (𝐴𝑉𝐴 ⊆ (wUniCl‘𝐴))
26 df1o2 8469 . . . . . . . . . 10 1o = {∅}
27 wunccl 10747 . . . . . . . . . . . 12 (𝐴𝑉 → (wUniCl‘𝐴) ∈ WUni)
2827wun0 10721 . . . . . . . . . . 11 (𝐴𝑉 → ∅ ∈ (wUniCl‘𝐴))
2928snssd 4757 . . . . . . . . . 10 (𝐴𝑉 → {∅} ⊆ (wUniCl‘𝐴))
3026, 29eqsstrid 3978 . . . . . . . . 9 (𝐴𝑉 → 1o ⊆ (wUniCl‘𝐴))
3125, 30unssd 4148 . . . . . . . 8 (𝐴𝑉 → (𝐴 ∪ 1o) ⊆ (wUniCl‘𝐴))
3224, 31eqsstrd 3974 . . . . . . 7 (𝐴𝑉 → (𝐹‘∅) ⊆ (wUniCl‘𝐴))
33 simplr 781 . . . . . . . . . . 11 (((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) → 𝑛 ∈ ω)
34 fvex 6901 . . . . . . . . . . . . 13 (𝐹𝑛) ∈ V
3534uniex 7752 . . . . . . . . . . . . 13 (𝐹𝑛) ∈ V
3634, 35unex 7755 . . . . . . . . . . . 12 ((𝐹𝑛) ∪ (𝐹𝑛)) ∈ V
37 prex 5414 . . . . . . . . . . . . . 14 {𝒫 𝑢, 𝑢} ∈ V
3834mptex 7228 . . . . . . . . . . . . . . 15 (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣}) ∈ V
3938rnex 7916 . . . . . . . . . . . . . 14 ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣}) ∈ V
4037, 39unex 7755 . . . . . . . . . . . . 13 ({𝒫 𝑢, 𝑢} ∪ ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣})) ∈ V
4134, 40iunex 7974 . . . . . . . . . . . 12 𝑢 ∈ (𝐹𝑛)({𝒫 𝑢, 𝑢} ∪ ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣})) ∈ V
4236, 41unex 7755 . . . . . . . . . . 11 (((𝐹𝑛) ∪ (𝐹𝑛)) ∪ 𝑢 ∈ (𝐹𝑛)({𝒫 𝑢, 𝑢} ∪ ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣}))) ∈ V
43 id 23 . . . . . . . . . . . . . 14 (𝑤 = 𝑧𝑤 = 𝑧)
44 unieq 4888 . . . . . . . . . . . . . 14 (𝑤 = 𝑧 𝑤 = 𝑧)
4543, 44uneq12d 4126 . . . . . . . . . . . . 13 (𝑤 = 𝑧 → (𝑤 𝑤) = (𝑧 𝑧))
46 pweq 4581 . . . . . . . . . . . . . . . . 17 (𝑢 = 𝑥 → 𝒫 𝑢 = 𝒫 𝑥)
47 unieq 4888 . . . . . . . . . . . . . . . . 17 (𝑢 = 𝑥 𝑢 = 𝑥)
4846, 47preq12d 4712 . . . . . . . . . . . . . . . 16 (𝑢 = 𝑥 → {𝒫 𝑢, 𝑢} = {𝒫 𝑥, 𝑥})
49 preq1 4704 . . . . . . . . . . . . . . . . . 18 (𝑢 = 𝑥 → {𝑢, 𝑣} = {𝑥, 𝑣})
5049mpteq2dv 5210 . . . . . . . . . . . . . . . . 17 (𝑢 = 𝑥 → (𝑣𝑤 ↦ {𝑢, 𝑣}) = (𝑣𝑤 ↦ {𝑥, 𝑣}))
5150rneqd 5933 . . . . . . . . . . . . . . . 16 (𝑢 = 𝑥 → ran (𝑣𝑤 ↦ {𝑢, 𝑣}) = ran (𝑣𝑤 ↦ {𝑥, 𝑣}))
5248, 51uneq12d 4126 . . . . . . . . . . . . . . 15 (𝑢 = 𝑥 → ({𝒫 𝑢, 𝑢} ∪ ran (𝑣𝑤 ↦ {𝑢, 𝑣})) = ({𝒫 𝑥, 𝑥} ∪ ran (𝑣𝑤 ↦ {𝑥, 𝑣})))
5352cbviunv 5008 . . . . . . . . . . . . . 14 𝑢𝑤 ({𝒫 𝑢, 𝑢} ∪ ran (𝑣𝑤 ↦ {𝑢, 𝑣})) = 𝑥𝑤 ({𝒫 𝑥, 𝑥} ∪ ran (𝑣𝑤 ↦ {𝑥, 𝑣}))
54 preq2 4705 . . . . . . . . . . . . . . . . . . 19 (𝑣 = 𝑦 → {𝑥, 𝑣} = {𝑥, 𝑦})
5554cbvmptv 5220 . . . . . . . . . . . . . . . . . 18 (𝑣𝑤 ↦ {𝑥, 𝑣}) = (𝑦𝑤 ↦ {𝑥, 𝑦})
56 mpteq1 5205 . . . . . . . . . . . . . . . . . 18 (𝑤 = 𝑧 → (𝑦𝑤 ↦ {𝑥, 𝑦}) = (𝑦𝑧 ↦ {𝑥, 𝑦}))
5755, 56eqtrid 2813 . . . . . . . . . . . . . . . . 17 (𝑤 = 𝑧 → (𝑣𝑤 ↦ {𝑥, 𝑣}) = (𝑦𝑧 ↦ {𝑥, 𝑦}))
5857rneqd 5933 . . . . . . . . . . . . . . . 16 (𝑤 = 𝑧 → ran (𝑣𝑤 ↦ {𝑥, 𝑣}) = ran (𝑦𝑧 ↦ {𝑥, 𝑦}))
5958uneq2d 4125 . . . . . . . . . . . . . . 15 (𝑤 = 𝑧 → ({𝒫 𝑥, 𝑥} ∪ ran (𝑣𝑤 ↦ {𝑥, 𝑣})) = ({𝒫 𝑥, 𝑥} ∪ ran (𝑦𝑧 ↦ {𝑥, 𝑦})))
6043, 59iuneq12d 4991 . . . . . . . . . . . . . 14 (𝑤 = 𝑧 𝑥𝑤 ({𝒫 𝑥, 𝑥} ∪ ran (𝑣𝑤 ↦ {𝑥, 𝑣})) = 𝑥𝑧 ({𝒫 𝑥, 𝑥} ∪ ran (𝑦𝑧 ↦ {𝑥, 𝑦})))
6153, 60eqtrid 2813 . . . . . . . . . . . . 13 (𝑤 = 𝑧 𝑢𝑤 ({𝒫 𝑢, 𝑢} ∪ ran (𝑣𝑤 ↦ {𝑢, 𝑣})) = 𝑥𝑧 ({𝒫 𝑥, 𝑥} ∪ ran (𝑦𝑧 ↦ {𝑥, 𝑦})))
6245, 61uneq12d 4126 . . . . . . . . . . . 12 (𝑤 = 𝑧 → ((𝑤 𝑤) ∪ 𝑢𝑤 ({𝒫 𝑢, 𝑢} ∪ ran (𝑣𝑤 ↦ {𝑢, 𝑣}))) = ((𝑧 𝑧) ∪ 𝑥𝑧 ({𝒫 𝑥, 𝑥} ∪ ran (𝑦𝑧 ↦ {𝑥, 𝑦}))))
63 id 23 . . . . . . . . . . . . . 14 (𝑤 = (𝐹𝑛) → 𝑤 = (𝐹𝑛))
64 unieq 4888 . . . . . . . . . . . . . 14 (𝑤 = (𝐹𝑛) → 𝑤 = (𝐹𝑛))
6563, 64uneq12d 4126 . . . . . . . . . . . . 13 (𝑤 = (𝐹𝑛) → (𝑤 𝑤) = ((𝐹𝑛) ∪ (𝐹𝑛)))
66 mpteq1 5205 . . . . . . . . . . . . . . . 16 (𝑤 = (𝐹𝑛) → (𝑣𝑤 ↦ {𝑢, 𝑣}) = (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣}))
6766rneqd 5933 . . . . . . . . . . . . . . 15 (𝑤 = (𝐹𝑛) → ran (𝑣𝑤 ↦ {𝑢, 𝑣}) = ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣}))
6867uneq2d 4125 . . . . . . . . . . . . . 14 (𝑤 = (𝐹𝑛) → ({𝒫 𝑢, 𝑢} ∪ ran (𝑣𝑤 ↦ {𝑢, 𝑣})) = ({𝒫 𝑢, 𝑢} ∪ ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣})))
6963, 68iuneq12d 4991 . . . . . . . . . . . . 13 (𝑤 = (𝐹𝑛) → 𝑢𝑤 ({𝒫 𝑢, 𝑢} ∪ ran (𝑣𝑤 ↦ {𝑢, 𝑣})) = 𝑢 ∈ (𝐹𝑛)({𝒫 𝑢, 𝑢} ∪ ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣})))
7065, 69uneq12d 4126 . . . . . . . . . . . 12 (𝑤 = (𝐹𝑛) → ((𝑤 𝑤) ∪ 𝑢𝑤 ({𝒫 𝑢, 𝑢} ∪ ran (𝑣𝑤 ↦ {𝑢, 𝑣}))) = (((𝐹𝑛) ∪ (𝐹𝑛)) ∪ 𝑢 ∈ (𝐹𝑛)({𝒫 𝑢, 𝑢} ∪ ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣}))))
711, 62, 70frsucmpt2 8436 . . . . . . . . . . 11 ((𝑛 ∈ ω ∧ (((𝐹𝑛) ∪ (𝐹𝑛)) ∪ 𝑢 ∈ (𝐹𝑛)({𝒫 𝑢, 𝑢} ∪ ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣}))) ∈ V) → (𝐹‘suc 𝑛) = (((𝐹𝑛) ∪ (𝐹𝑛)) ∪ 𝑢 ∈ (𝐹𝑛)({𝒫 𝑢, 𝑢} ∪ ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣}))))
7233, 42, 71sylancl 598 . . . . . . . . . 10 (((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) → (𝐹‘suc 𝑛) = (((𝐹𝑛) ∪ (𝐹𝑛)) ∪ 𝑢 ∈ (𝐹𝑛)({𝒫 𝑢, 𝑢} ∪ ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣}))))
73 simpr 490 . . . . . . . . . . . 12 (((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) → (𝐹𝑛) ⊆ (wUniCl‘𝐴))
7427ad3antrrr 743 . . . . . . . . . . . . . . 15 ((((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹𝑛)) → (wUniCl‘𝐴) ∈ WUni)
7573sselda 3940 . . . . . . . . . . . . . . 15 ((((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹𝑛)) → 𝑢 ∈ (wUniCl‘𝐴))
7674, 75wunelss 10711 . . . . . . . . . . . . . 14 ((((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹𝑛)) → 𝑢 ⊆ (wUniCl‘𝐴))
7776ralrimiva 3160 . . . . . . . . . . . . 13 (((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) → ∀𝑢 ∈ (𝐹𝑛)𝑢 ⊆ (wUniCl‘𝐴))
78 unissb 4911 . . . . . . . . . . . . 13 ( (𝐹𝑛) ⊆ (wUniCl‘𝐴) ↔ ∀𝑢 ∈ (𝐹𝑛)𝑢 ⊆ (wUniCl‘𝐴))
7977, 78sylibr 237 . . . . . . . . . . . 12 (((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) → (𝐹𝑛) ⊆ (wUniCl‘𝐴))
8073, 79unssd 4148 . . . . . . . . . . 11 (((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) → ((𝐹𝑛) ∪ (𝐹𝑛)) ⊆ (wUniCl‘𝐴))
8174, 75wunpw 10710 . . . . . . . . . . . . . . 15 ((((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹𝑛)) → 𝒫 𝑢 ∈ (wUniCl‘𝐴))
8274, 75wununi 10709 . . . . . . . . . . . . . . 15 ((((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹𝑛)) → 𝑢 ∈ (wUniCl‘𝐴))
8381, 82prssd 4793 . . . . . . . . . . . . . 14 ((((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹𝑛)) → {𝒫 𝑢, 𝑢} ⊆ (wUniCl‘𝐴))
8474adantr 486 . . . . . . . . . . . . . . . . 17 (((((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹𝑛)) ∧ 𝑣 ∈ (𝐹𝑛)) → (wUniCl‘𝐴) ∈ WUni)
8575adantr 486 . . . . . . . . . . . . . . . . 17 (((((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹𝑛)) ∧ 𝑣 ∈ (𝐹𝑛)) → 𝑢 ∈ (wUniCl‘𝐴))
86 simplr 781 . . . . . . . . . . . . . . . . . 18 ((((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹𝑛)) → (𝐹𝑛) ⊆ (wUniCl‘𝐴))
8786sselda 3940 . . . . . . . . . . . . . . . . 17 (((((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹𝑛)) ∧ 𝑣 ∈ (𝐹𝑛)) → 𝑣 ∈ (wUniCl‘𝐴))
8884, 85, 87wunpr 10712 . . . . . . . . . . . . . . . 16 (((((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹𝑛)) ∧ 𝑣 ∈ (𝐹𝑛)) → {𝑢, 𝑣} ∈ (wUniCl‘𝐴))
8988fmpttd 7117 . . . . . . . . . . . . . . 15 ((((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹𝑛)) → (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣}):(𝐹𝑛)⟶(wUniCl‘𝐴))
9089frnd 6721 . . . . . . . . . . . . . 14 ((((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹𝑛)) → ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣}) ⊆ (wUniCl‘𝐴))
9183, 90unssd 4148 . . . . . . . . . . . . 13 ((((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹𝑛)) → ({𝒫 𝑢, 𝑢} ∪ ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣})) ⊆ (wUniCl‘𝐴))
9291ralrimiva 3160 . . . . . . . . . . . 12 (((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) → ∀𝑢 ∈ (𝐹𝑛)({𝒫 𝑢, 𝑢} ∪ ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣})) ⊆ (wUniCl‘𝐴))
93 iunss 5014 . . . . . . . . . . . 12 ( 𝑢 ∈ (𝐹𝑛)({𝒫 𝑢, 𝑢} ∪ ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣})) ⊆ (wUniCl‘𝐴) ↔ ∀𝑢 ∈ (𝐹𝑛)({𝒫 𝑢, 𝑢} ∪ ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣})) ⊆ (wUniCl‘𝐴))
9492, 93sylibr 237 . . . . . . . . . . 11 (((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) → 𝑢 ∈ (𝐹𝑛)({𝒫 𝑢, 𝑢} ∪ ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣})) ⊆ (wUniCl‘𝐴))
9580, 94unssd 4148 . . . . . . . . . 10 (((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) → (((𝐹𝑛) ∪ (𝐹𝑛)) ∪ 𝑢 ∈ (𝐹𝑛)({𝒫 𝑢, 𝑢} ∪ ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣}))) ⊆ (wUniCl‘𝐴))
9672, 95eqsstrd 3974 . . . . . . . . 9 (((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) → (𝐹‘suc 𝑛) ⊆ (wUniCl‘𝐴))
9796ex 418 . . . . . . . 8 ((𝐴𝑉𝑛 ∈ ω) → ((𝐹𝑛) ⊆ (wUniCl‘𝐴) → (𝐹‘suc 𝑛) ⊆ (wUniCl‘𝐴)))
9897expcom 419 . . . . . . 7 (𝑛 ∈ ω → (𝐴𝑉 → ((𝐹𝑛) ⊆ (wUniCl‘𝐴) → (𝐹‘suc 𝑛) ⊆ (wUniCl‘𝐴))))
9913, 15, 17, 32, 98finds2 7904 . . . . . 6 (𝑚 ∈ ω → (𝐴𝑉 → (𝐹𝑚) ⊆ (wUniCl‘𝐴)))
10099com12 33 . . . . 5 (𝐴𝑉 → (𝑚 ∈ ω → (𝐹𝑚) ⊆ (wUniCl‘𝐴)))
101100ralrimiv 3159 . . . 4 (𝐴𝑉 → ∀𝑚 ∈ ω (𝐹𝑚) ⊆ (wUniCl‘𝐴))
102 iunss 5014 . . . 4 ( 𝑚 ∈ ω (𝐹𝑚) ⊆ (wUniCl‘𝐴) ↔ ∀𝑚 ∈ ω (𝐹𝑚) ⊆ (wUniCl‘𝐴))
103101, 102sylibr 237 . . 3 (𝐴𝑉 𝑚 ∈ ω (𝐹𝑚) ⊆ (wUniCl‘𝐴))
10411, 103eqsstrid 3978 . 2 (𝐴𝑉𝑈 ⊆ (wUniCl‘𝐴))
1055, 104eqssd 3957 1 (𝐴𝑉 → (wUniCl‘𝐴) = 𝑈)
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wi 4  wa 401   = wceq 1570  wcel 2146  wral 3082  Vcvv 3458  cun 3906  wss 3908  c0 4289  𝒫 cpw 4567  {csn 4594  {cpr 4596   cuni 4877   ciun 4961  cmpt 5197  ran crn 5667  cres 5668  Oncon0 6367  suc csuc 6369   Fn wfn 6538  cfv 6543  ωcom 7871  reccrdg 8405  1oc1o 8455  WUnicwun 10703  wUniClcwunm 10704
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2148  ax-9 2156  ax-10 2179  ax-11 2195  ax-12 2216  ax-ext 2738  ax-rep 5243  ax-sep 5262  ax-nul 5274  ax-pow 5341  ax-pr 5409  ax-un 7745  ax-inf2 9620
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2570  df-eu 2600  df-clab 2745  df-cleq 2758  df-clel 2841  df-nfc 2915  df-ne 2962  df-ral 3083  df-rex 3093  df-reu 3373  df-rab 3420  df-v 3460  df-sbc 3748  df-csb 3857  df-dif 3911  df-un 3913  df-in 3915  df-ss 3925  df-pss 3928  df-nul 4290  df-if 4493  df-pw 4569  df-sn 4595  df-pr 4597  df-op 4601  df-uni 4878  df-int 4918  df-iun 4963  df-iin 4964  df-br 5115  df-opab 5179  df-mpt 5198  df-tr 5224  df-id 5561  df-eprel 5566  df-po 5574  df-so 5575  df-fr 5619  df-we 5621  df-xp 5672  df-rel 5673  df-cnv 5674  df-co 5675  df-dm 5676  df-rn 5677  df-res 5678  df-ima 5679  df-pred 6309  df-ord 6370  df-on 6371  df-lim 6372  df-suc 6373  df-iota 6499  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-fv 6551  df-ov 7426  df-om 7872  df-2nd 7996  df-frecs 8287  df-wrecs 8318  df-recs 8367  df-rdg 8406  df-1o 8462  df-wun 10705  df-wunc 10706
This theorem is used by: (None)
  Copyright terms: Public domain W3C validator