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

Theorem wuncval2 10720
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 10711 . . 3 (𝐴𝑉 → (𝑈 ∈ WUni ∧ 𝐴𝑈))
4 wuncss 10718 . . 3 ((𝑈 ∈ WUni ∧ 𝐴𝑈) → (wUniCl‘𝐴) ⊆ 𝑈)
53, 4syl 18 . 2 (𝐴𝑉 → (wUniCl‘𝐴) ⊆ 𝑈)
6 frfnom 8410 . . . . . 6 (rec((𝑧 ∈ V ↦ ((𝑧 𝑧) ∪ 𝑥𝑧 ({𝒫 𝑥, 𝑥} ∪ ran (𝑦𝑧 ↦ {𝑥, 𝑦})))), (𝐴 ∪ 1o)) ↾ ω) Fn ω
71fneq1i 6622 . . . . . 6 (𝐹 Fn ω ↔ (rec((𝑧 ∈ V ↦ ((𝑧 𝑧) ∪ 𝑥𝑧 ({𝒫 𝑥, 𝑥} ∪ ran (𝑦𝑧 ↦ {𝑥, 𝑦})))), (𝐴 ∪ 1o)) ↾ ω) Fn ω)
86, 7mpbir 234 . . . . 5 𝐹 Fn ω
9 fniunfv 7235 . . . . 5 (𝐹 Fn ω → 𝑚 ∈ ω (𝐹𝑚) = ran 𝐹)
108, 9ax-mp 5 . . . 4 𝑚 ∈ ω (𝐹𝑚) = ran 𝐹
112, 10eqtr4i 2791 . . 3 𝑈 = 𝑚 ∈ ω (𝐹𝑚)
12 fveq2 6871 . . . . . . . 8 (𝑚 = ∅ → (𝐹𝑚) = (𝐹‘∅))
1312sseq1d 3970 . . . . . . 7 (𝑚 = ∅ → ((𝐹𝑚) ⊆ (wUniCl‘𝐴) ↔ (𝐹‘∅) ⊆ (wUniCl‘𝐴)))
14 fveq2 6871 . . . . . . . 8 (𝑚 = 𝑛 → (𝐹𝑚) = (𝐹𝑛))
1514sseq1d 3970 . . . . . . 7 (𝑚 = 𝑛 → ((𝐹𝑚) ⊆ (wUniCl‘𝐴) ↔ (𝐹𝑛) ⊆ (wUniCl‘𝐴)))
16 fveq2 6871 . . . . . . . 8 (𝑚 = suc 𝑛 → (𝐹𝑚) = (𝐹‘suc 𝑛))
1716sseq1d 3970 . . . . . . 7 (𝑚 = suc 𝑛 → ((𝐹𝑚) ⊆ (wUniCl‘𝐴) ↔ (𝐹‘suc 𝑛) ⊆ (wUniCl‘𝐴)))
18 1on 8454 . . . . . . . . . 10 1o ∈ On
19 unexg 7730 . . . . . . . . . 10 ((𝐴𝑉 ∧ 1o ∈ On) → (𝐴 ∪ 1o) ∈ V)
2018, 19mpan2 703 . . . . . . . . 9 (𝐴𝑉 → (𝐴 ∪ 1o) ∈ V)
211fveq1i 6872 . . . . . . . . . 10 (𝐹‘∅) = ((rec((𝑧 ∈ V ↦ ((𝑧 𝑧) ∪ 𝑥𝑧 ({𝒫 𝑥, 𝑥} ∪ ran (𝑦𝑧 ↦ {𝑥, 𝑦})))), (𝐴 ∪ 1o)) ↾ ω)‘∅)
22 fr0g 8411 . . . . . . . . . 10 ((𝐴 ∪ 1o) ∈ V → ((rec((𝑧 ∈ V ↦ ((𝑧 𝑧) ∪ 𝑥𝑧 ({𝒫 𝑥, 𝑥} ∪ ran (𝑦𝑧 ↦ {𝑥, 𝑦})))), (𝐴 ∪ 1o)) ↾ ω)‘∅) = (𝐴 ∪ 1o))
2321, 22eqtrid 2812 . . . . . . . . 9 ((𝐴 ∪ 1o) ∈ V → (𝐹‘∅) = (𝐴 ∪ 1o))
2420, 23syl 18 . . . . . . . 8 (𝐴𝑉 → (𝐹‘∅) = (𝐴 ∪ 1o))
25 wuncid 10716 . . . . . . . . 9 (𝐴𝑉𝐴 ⊆ (wUniCl‘𝐴))
26 df1o2 8448 . . . . . . . . . 10 1o = {∅}
27 wunccl 10717 . . . . . . . . . . . 12 (𝐴𝑉 → (wUniCl‘𝐴) ∈ WUni)
2827wun0 10691 . . . . . . . . . . 11 (𝐴𝑉 → ∅ ∈ (wUniCl‘𝐴))
2928snssd 4748 . . . . . . . . . 10 (𝐴𝑉 → {∅} ⊆ (wUniCl‘𝐴))
3026, 29eqsstrid 3977 . . . . . . . . 9 (𝐴𝑉 → 1o ⊆ (wUniCl‘𝐴))
3125, 30unssd 4147 . . . . . . . 8 (𝐴𝑉 → (𝐴 ∪ 1o) ⊆ (wUniCl‘𝐴))
3224, 31eqsstrd 3973 . . . . . . 7 (𝐴𝑉 → (𝐹‘∅) ⊆ (wUniCl‘𝐴))
33 simplr 780 . . . . . . . . . . 11 (((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) → 𝑛 ∈ ω)
34 fvex 6884 . . . . . . . . . . . . 13 (𝐹𝑛) ∈ V
3534uniex 7728 . . . . . . . . . . . . 13 (𝐹𝑛) ∈ V
3634, 35unex 7731 . . . . . . . . . . . 12 ((𝐹𝑛) ∪ (𝐹𝑛)) ∈ V
37 prex 5399 . . . . . . . . . . . . . 14 {𝒫 𝑢, 𝑢} ∈ V
3834mptex 7211 . . . . . . . . . . . . . . 15 (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣}) ∈ V
3938rnex 7895 . . . . . . . . . . . . . 14 ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣}) ∈ V
4037, 39unex 7731 . . . . . . . . . . . . 13 ({𝒫 𝑢, 𝑢} ∪ ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣})) ∈ V
4134, 40iunex 7953 . . . . . . . . . . . 12 𝑢 ∈ (𝐹𝑛)({𝒫 𝑢, 𝑢} ∪ ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣})) ∈ V
4236, 41unex 7731 . . . . . . . . . . 11 (((𝐹𝑛) ∪ (𝐹𝑛)) ∪ 𝑢 ∈ (𝐹𝑛)({𝒫 𝑢, 𝑢} ∪ ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣}))) ∈ V
43 id 23 . . . . . . . . . . . . . 14 (𝑤 = 𝑧𝑤 = 𝑧)
44 unieq 4878 . . . . . . . . . . . . . 14 (𝑤 = 𝑧 𝑤 = 𝑧)
4543, 44uneq12d 4125 . . . . . . . . . . . . 13 (𝑤 = 𝑧 → (𝑤 𝑤) = (𝑧 𝑧))
46 pweq 4572 . . . . . . . . . . . . . . . . 17 (𝑢 = 𝑥 → 𝒫 𝑢 = 𝒫 𝑥)
47 unieq 4878 . . . . . . . . . . . . . . . . 17 (𝑢 = 𝑥 𝑢 = 𝑥)
4846, 47preq12d 4703 . . . . . . . . . . . . . . . 16 (𝑢 = 𝑥 → {𝒫 𝑢, 𝑢} = {𝒫 𝑥, 𝑥})
49 preq1 4695 . . . . . . . . . . . . . . . . . 18 (𝑢 = 𝑥 → {𝑢, 𝑣} = {𝑥, 𝑣})
5049mpteq2dv 5198 . . . . . . . . . . . . . . . . 17 (𝑢 = 𝑥 → (𝑣𝑤 ↦ {𝑢, 𝑣}) = (𝑣𝑤 ↦ {𝑥, 𝑣}))
5150rneqd 5918 . . . . . . . . . . . . . . . 16 (𝑢 = 𝑥 → ran (𝑣𝑤 ↦ {𝑢, 𝑣}) = ran (𝑣𝑤 ↦ {𝑥, 𝑣}))
5248, 51uneq12d 4125 . . . . . . . . . . . . . . 15 (𝑢 = 𝑥 → ({𝒫 𝑢, 𝑢} ∪ ran (𝑣𝑤 ↦ {𝑢, 𝑣})) = ({𝒫 𝑥, 𝑥} ∪ ran (𝑣𝑤 ↦ {𝑥, 𝑣})))
5352cbviunv 4998 . . . . . . . . . . . . . 14 𝑢𝑤 ({𝒫 𝑢, 𝑢} ∪ ran (𝑣𝑤 ↦ {𝑢, 𝑣})) = 𝑥𝑤 ({𝒫 𝑥, 𝑥} ∪ ran (𝑣𝑤 ↦ {𝑥, 𝑣}))
54 preq2 4696 . . . . . . . . . . . . . . . . . . 19 (𝑣 = 𝑦 → {𝑥, 𝑣} = {𝑥, 𝑦})
5554cbvmptv 5208 . . . . . . . . . . . . . . . . . 18 (𝑣𝑤 ↦ {𝑥, 𝑣}) = (𝑦𝑤 ↦ {𝑥, 𝑦})
56 mpteq1 5193 . . . . . . . . . . . . . . . . . 18 (𝑤 = 𝑧 → (𝑦𝑤 ↦ {𝑥, 𝑦}) = (𝑦𝑧 ↦ {𝑥, 𝑦}))
5755, 56eqtrid 2812 . . . . . . . . . . . . . . . . 17 (𝑤 = 𝑧 → (𝑣𝑤 ↦ {𝑥, 𝑣}) = (𝑦𝑧 ↦ {𝑥, 𝑦}))
5857rneqd 5918 . . . . . . . . . . . . . . . 16 (𝑤 = 𝑧 → ran (𝑣𝑤 ↦ {𝑥, 𝑣}) = ran (𝑦𝑧 ↦ {𝑥, 𝑦}))
5958uneq2d 4124 . . . . . . . . . . . . . . 15 (𝑤 = 𝑧 → ({𝒫 𝑥, 𝑥} ∪ ran (𝑣𝑤 ↦ {𝑥, 𝑣})) = ({𝒫 𝑥, 𝑥} ∪ ran (𝑦𝑧 ↦ {𝑥, 𝑦})))
6043, 59iuneq12d 4981 . . . . . . . . . . . . . 14 (𝑤 = 𝑧 𝑥𝑤 ({𝒫 𝑥, 𝑥} ∪ ran (𝑣𝑤 ↦ {𝑥, 𝑣})) = 𝑥𝑧 ({𝒫 𝑥, 𝑥} ∪ ran (𝑦𝑧 ↦ {𝑥, 𝑦})))
6153, 60eqtrid 2812 . . . . . . . . . . . . 13 (𝑤 = 𝑧 𝑢𝑤 ({𝒫 𝑢, 𝑢} ∪ ran (𝑣𝑤 ↦ {𝑢, 𝑣})) = 𝑥𝑧 ({𝒫 𝑥, 𝑥} ∪ ran (𝑦𝑧 ↦ {𝑥, 𝑦})))
6245, 61uneq12d 4125 . . . . . . . . . . . 12 (𝑤 = 𝑧 → ((𝑤 𝑤) ∪ 𝑢𝑤 ({𝒫 𝑢, 𝑢} ∪ ran (𝑣𝑤 ↦ {𝑢, 𝑣}))) = ((𝑧 𝑧) ∪ 𝑥𝑧 ({𝒫 𝑥, 𝑥} ∪ ran (𝑦𝑧 ↦ {𝑥, 𝑦}))))
63 id 23 . . . . . . . . . . . . . 14 (𝑤 = (𝐹𝑛) → 𝑤 = (𝐹𝑛))
64 unieq 4878 . . . . . . . . . . . . . 14 (𝑤 = (𝐹𝑛) → 𝑤 = (𝐹𝑛))
6563, 64uneq12d 4125 . . . . . . . . . . . . 13 (𝑤 = (𝐹𝑛) → (𝑤 𝑤) = ((𝐹𝑛) ∪ (𝐹𝑛)))
66 mpteq1 5193 . . . . . . . . . . . . . . . 16 (𝑤 = (𝐹𝑛) → (𝑣𝑤 ↦ {𝑢, 𝑣}) = (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣}))
6766rneqd 5918 . . . . . . . . . . . . . . 15 (𝑤 = (𝐹𝑛) → ran (𝑣𝑤 ↦ {𝑢, 𝑣}) = ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣}))
6867uneq2d 4124 . . . . . . . . . . . . . 14 (𝑤 = (𝐹𝑛) → ({𝒫 𝑢, 𝑢} ∪ ran (𝑣𝑤 ↦ {𝑢, 𝑣})) = ({𝒫 𝑢, 𝑢} ∪ ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣})))
6963, 68iuneq12d 4981 . . . . . . . . . . . . 13 (𝑤 = (𝐹𝑛) → 𝑢𝑤 ({𝒫 𝑢, 𝑢} ∪ ran (𝑣𝑤 ↦ {𝑢, 𝑣})) = 𝑢 ∈ (𝐹𝑛)({𝒫 𝑢, 𝑢} ∪ ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣})))
7065, 69uneq12d 4125 . . . . . . . . . . . 12 (𝑤 = (𝐹𝑛) → ((𝑤 𝑤) ∪ 𝑢𝑤 ({𝒫 𝑢, 𝑢} ∪ ran (𝑣𝑤 ↦ {𝑢, 𝑣}))) = (((𝐹𝑛) ∪ (𝐹𝑛)) ∪ 𝑢 ∈ (𝐹𝑛)({𝒫 𝑢, 𝑢} ∪ ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣}))))
711, 62, 70frsucmpt2 8415 . . . . . . . . . . 11 ((𝑛 ∈ ω ∧ (((𝐹𝑛) ∪ (𝐹𝑛)) ∪ 𝑢 ∈ (𝐹𝑛)({𝒫 𝑢, 𝑢} ∪ ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣}))) ∈ V) → (𝐹‘suc 𝑛) = (((𝐹𝑛) ∪ (𝐹𝑛)) ∪ 𝑢 ∈ (𝐹𝑛)({𝒫 𝑢, 𝑢} ∪ ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣}))))
7233, 42, 71sylancl 597 . . . . . . . . . 10 (((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) → (𝐹‘suc 𝑛) = (((𝐹𝑛) ∪ (𝐹𝑛)) ∪ 𝑢 ∈ (𝐹𝑛)({𝒫 𝑢, 𝑢} ∪ ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣}))))
73 simpr 489 . . . . . . . . . . . 12 (((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) → (𝐹𝑛) ⊆ (wUniCl‘𝐴))
7427ad3antrrr 742 . . . . . . . . . . . . . . 15 ((((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹𝑛)) → (wUniCl‘𝐴) ∈ WUni)
7573sselda 3939 . . . . . . . . . . . . . . 15 ((((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹𝑛)) → 𝑢 ∈ (wUniCl‘𝐴))
7674, 75wunelss 10681 . . . . . . . . . . . . . 14 ((((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹𝑛)) → 𝑢 ⊆ (wUniCl‘𝐴))
7776ralrimiva 3157 . . . . . . . . . . . . 13 (((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) → ∀𝑢 ∈ (𝐹𝑛)𝑢 ⊆ (wUniCl‘𝐴))
78 unissb 4901 . . . . . . . . . . . . 13 ( (𝐹𝑛) ⊆ (wUniCl‘𝐴) ↔ ∀𝑢 ∈ (𝐹𝑛)𝑢 ⊆ (wUniCl‘𝐴))
7977, 78sylibr 237 . . . . . . . . . . . 12 (((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) → (𝐹𝑛) ⊆ (wUniCl‘𝐴))
8073, 79unssd 4147 . . . . . . . . . . 11 (((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) → ((𝐹𝑛) ∪ (𝐹𝑛)) ⊆ (wUniCl‘𝐴))
8174, 75wunpw 10680 . . . . . . . . . . . . . . 15 ((((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹𝑛)) → 𝒫 𝑢 ∈ (wUniCl‘𝐴))
8274, 75wununi 10679 . . . . . . . . . . . . . . 15 ((((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹𝑛)) → 𝑢 ∈ (wUniCl‘𝐴))
8381, 82prssd 4783 . . . . . . . . . . . . . 14 ((((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹𝑛)) → {𝒫 𝑢, 𝑢} ⊆ (wUniCl‘𝐴))
8474adantr 485 . . . . . . . . . . . . . . . . 17 (((((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹𝑛)) ∧ 𝑣 ∈ (𝐹𝑛)) → (wUniCl‘𝐴) ∈ WUni)
8575adantr 485 . . . . . . . . . . . . . . . . 17 (((((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹𝑛)) ∧ 𝑣 ∈ (𝐹𝑛)) → 𝑢 ∈ (wUniCl‘𝐴))
86 simplr 780 . . . . . . . . . . . . . . . . . 18 ((((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹𝑛)) → (𝐹𝑛) ⊆ (wUniCl‘𝐴))
8786sselda 3939 . . . . . . . . . . . . . . . . 17 (((((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹𝑛)) ∧ 𝑣 ∈ (𝐹𝑛)) → 𝑣 ∈ (wUniCl‘𝐴))
8884, 85, 87wunpr 10682 . . . . . . . . . . . . . . . 16 (((((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹𝑛)) ∧ 𝑣 ∈ (𝐹𝑛)) → {𝑢, 𝑣} ∈ (wUniCl‘𝐴))
8988fmpttd 7100 . . . . . . . . . . . . . . 15 ((((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹𝑛)) → (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣}):(𝐹𝑛)⟶(wUniCl‘𝐴))
9089frnd 6704 . . . . . . . . . . . . . 14 ((((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹𝑛)) → ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣}) ⊆ (wUniCl‘𝐴))
9183, 90unssd 4147 . . . . . . . . . . . . 13 ((((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹𝑛)) → ({𝒫 𝑢, 𝑢} ∪ ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣})) ⊆ (wUniCl‘𝐴))
9291ralrimiva 3157 . . . . . . . . . . . 12 (((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) → ∀𝑢 ∈ (𝐹𝑛)({𝒫 𝑢, 𝑢} ∪ ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣})) ⊆ (wUniCl‘𝐴))
93 iunss 5004 . . . . . . . . . . . 12 ( 𝑢 ∈ (𝐹𝑛)({𝒫 𝑢, 𝑢} ∪ ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣})) ⊆ (wUniCl‘𝐴) ↔ ∀𝑢 ∈ (𝐹𝑛)({𝒫 𝑢, 𝑢} ∪ ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣})) ⊆ (wUniCl‘𝐴))
9492, 93sylibr 237 . . . . . . . . . . 11 (((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) → 𝑢 ∈ (𝐹𝑛)({𝒫 𝑢, 𝑢} ∪ ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣})) ⊆ (wUniCl‘𝐴))
9580, 94unssd 4147 . . . . . . . . . 10 (((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) → (((𝐹𝑛) ∪ (𝐹𝑛)) ∪ 𝑢 ∈ (𝐹𝑛)({𝒫 𝑢, 𝑢} ∪ ran (𝑣 ∈ (𝐹𝑛) ↦ {𝑢, 𝑣}))) ⊆ (wUniCl‘𝐴))
9672, 95eqsstrd 3973 . . . . . . . . 9 (((𝐴𝑉𝑛 ∈ ω) ∧ (𝐹𝑛) ⊆ (wUniCl‘𝐴)) → (𝐹‘suc 𝑛) ⊆ (wUniCl‘𝐴))
9796ex 417 . . . . . . . 8 ((𝐴𝑉𝑛 ∈ ω) → ((𝐹𝑛) ⊆ (wUniCl‘𝐴) → (𝐹‘suc 𝑛) ⊆ (wUniCl‘𝐴)))
9897expcom 418 . . . . . . 7 (𝑛 ∈ ω → (𝐴𝑉 → ((𝐹𝑛) ⊆ (wUniCl‘𝐴) → (𝐹‘suc 𝑛) ⊆ (wUniCl‘𝐴))))
9913, 15, 17, 32, 98finds2 7883 . . . . . 6 (𝑚 ∈ ω → (𝐴𝑉 → (𝐹𝑚) ⊆ (wUniCl‘𝐴)))
10099com12 33 . . . . 5 (𝐴𝑉 → (𝑚 ∈ ω → (𝐹𝑚) ⊆ (wUniCl‘𝐴)))
101100ralrimiv 3156 . . . 4 (𝐴𝑉 → ∀𝑚 ∈ ω (𝐹𝑚) ⊆ (wUniCl‘𝐴))
102 iunss 5004 . . . 4 ( 𝑚 ∈ ω (𝐹𝑚) ⊆ (wUniCl‘𝐴) ↔ ∀𝑚 ∈ ω (𝐹𝑚) ⊆ (wUniCl‘𝐴))
103101, 102sylibr 237 . . 3 (𝐴𝑉 𝑚 ∈ ω (𝐹𝑚) ⊆ (wUniCl‘𝐴))
10411, 103eqsstrid 3977 . 2 (𝐴𝑉𝑈 ⊆ (wUniCl‘𝐴))
1055, 104eqssd 3956 1 (𝐴𝑉 → (wUniCl‘𝐴) = 𝑈)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 400   = wceq 1563  wcel 2145  wral 3079  Vcvv 3457  cun 3905  wss 3907  c0 4288  𝒫 cpw 4558  {csn 4585  {cpr 4587   cuni 4867   ciun 4951  cmpt 5185  ran crn 5652  cres 5653  Oncon0 6349  suc csuc 6351   Fn wfn 6520  cfv 6525  ωcom 7850  reccrdg 8384  1oc1o 8434  WUnicwun 10673  wUniClcwunm 10674
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1818  ax-4 1832  ax-5 1933  ax-6 1990  ax-7 2031  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2215  ax-ext 2737  ax-rep 5231  ax-sep 5250  ax-nul 5260  ax-pow 5326  ax-pr 5394  ax-un 7722  ax-inf2 9598
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1102  df-3an 1103  df-tru 1566  df-fal 1576  df-ex 1803  df-nf 1807  df-sb 2094  df-mo 2569  df-eu 2599  df-clab 2744  df-cleq 2757  df-clel 2840  df-nfc 2914  df-ne 2961  df-ral 3080  df-rex 3090  df-reu 3371  df-rab 3418  df-v 3459  df-sbc 3748  df-csb 3856  df-dif 3910  df-un 3912  df-in 3914  df-ss 3924  df-pss 3927  df-nul 4289  df-if 4484  df-pw 4560  df-sn 4586  df-pr 4588  df-op 4592  df-uni 4868  df-int 4908  df-iun 4953  df-iin 4954  df-br 5105  df-opab 5167  df-mpt 5186  df-tr 5212  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-we 5606  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-pred 6291  df-ord 6352  df-on 6353  df-lim 6354  df-suc 6355  df-iota 6481  df-fun 6527  df-fn 6528  df-f 6529  df-f1 6530  df-fo 6531  df-f1o 6532  df-fv 6533  df-ov 7403  df-om 7851  df-2nd 7975  df-frecs 8266  df-wrecs 8297  df-recs 8346  df-rdg 8385  df-1o 8441  df-wun 10675  df-wunc 10676
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator