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

Theorem wuncval2 10813
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 10804 . . 3 (𝐴 ∈ 𝑉 → (𝑈 ∈ WUni ∧ 𝐴 ⊆ 𝑈))
4 wuncss 10811 . . 3 ((𝑈 ∈ WUni ∧ 𝐴 ⊆ 𝑈) → (wUniCl‘𝐴) ⊆ 𝑈)
53, 4syl 18 . 2 (𝐴 ∈ 𝑉 → (wUniCl‘𝐴) ⊆ 𝑈)
6 frfnom 8427 . . . . . 6 (rec((𝑧 ∈ V ↦ ((𝑧 ∪ ∪ 𝑧) ∪ ∪ 𝑥 ∈ 𝑧 ({𝒫 𝑥, ∪ 𝑥} ∪ ran (𝑦 ∈ 𝑧 ↦ {𝑥, 𝑦})))), (𝐴 ∪ 1o)) ↾ ω) Fn ω
71fneq1i 6628 . . . . . 6 (𝐹 Fn ω ↔ (rec((𝑧 ∈ V ↦ ((𝑧 ∪ ∪ 𝑧) ∪ ∪ 𝑥 ∈ 𝑧 ({𝒫 𝑥, ∪ 𝑥} ∪ ran (𝑦 ∈ 𝑧 ↦ {𝑥, 𝑦})))), (𝐴 ∪ 1o)) ↾ ω) Fn ω)
86, 7mpbir 234 . . . . 5 𝐹 Fn ω
9 fniunfv 7243 . . . . 5 (𝐹 Fn ω → ∪ 𝑚 ∈ ω (𝐹‘𝑚) = ∪ ran 𝐹)
108, 9ax-mp 5 . . . 4 ∪ 𝑚 ∈ ω (𝐹‘𝑚) = ∪ ran 𝐹
112, 10eqtr4i 2787 . . 3 𝑈 = ∪ 𝑚 ∈ ω (𝐹‘𝑚)
12 fveq2 6877 . . . . . . . 8 (𝑚 = ∅ → (𝐹‘𝑚) = (𝐹‘∅))
1312sseq1d 3962 . . . . . . 7 (𝑚 = ∅ → ((𝐹‘𝑚) ⊆ (wUniCl‘𝐴) ↔ (𝐹‘∅) ⊆ (wUniCl‘𝐴)))
14 fveq2 6877 . . . . . . . 8 (𝑚 = 𝑛 → (𝐹‘𝑚) = (𝐹‘𝑛))
1514sseq1d 3962 . . . . . . 7 (𝑚 = 𝑛 → ((𝐹‘𝑚) ⊆ (wUniCl‘𝐴) ↔ (𝐹‘𝑛) ⊆ (wUniCl‘𝐴)))
16 fveq2 6877 . . . . . . . 8 (𝑚 = suc 𝑛 → (𝐹‘𝑚) = (𝐹‘suc 𝑛))
1716sseq1d 3962 . . . . . . 7 (𝑚 = suc 𝑛 → ((𝐹‘𝑚) ⊆ (wUniCl‘𝐴) ↔ (𝐹‘suc 𝑛) ⊆ (wUniCl‘𝐴)))
18 1on 8473 . . . . . . . . . 10 1o ∈ On
19 unexg 7749 . . . . . . . . . 10 ((𝐴 ∈ 𝑉 ∧ 1o ∈ On) → (𝐴 ∪ 1o) ∈ V)
2018, 19mpan2 704 . . . . . . . . 9 (𝐴 ∈ 𝑉 → (𝐴 ∪ 1o) ∈ V)
211fveq1i 6878 . . . . . . . . . 10 (𝐹‘∅) = ((rec((𝑧 ∈ V ↦ ((𝑧 ∪ ∪ 𝑧) ∪ ∪ 𝑥 ∈ 𝑧 ({𝒫 𝑥, ∪ 𝑥} ∪ ran (𝑦 ∈ 𝑧 ↦ {𝑥, 𝑦})))), (𝐴 ∪ 1o)) ↾ ω)‘∅)
22 fr0g 8428 . . . . . . . . . 10 ((𝐴 ∪ 1o) ∈ V → ((rec((𝑧 ∈ V ↦ ((𝑧 ∪ ∪ 𝑧) ∪ ∪ 𝑥 ∈ 𝑧 ({𝒫 𝑥, ∪ 𝑥} ∪ ran (𝑦 ∈ 𝑧 ↦ {𝑥, 𝑦})))), (𝐴 ∪ 1o)) ↾ ω)‘∅) = (𝐴 ∪ 1o))
2321, 22eqtrid 2808 . . . . . . . . 9 ((𝐴 ∪ 1o) ∈ V → (𝐹‘∅) = (𝐴 ∪ 1o))
2420, 23syl 18 . . . . . . . 8 (𝐴 ∈ 𝑉 → (𝐹‘∅) = (𝐴 ∪ 1o))
25 wuncid 10809 . . . . . . . . 9 (𝐴 ∈ 𝑉 → 𝐴 ⊆ (wUniCl‘𝐴))
26 df1o2 8467 . . . . . . . . . 10 1o = {∅}
27 wunccl 10810 . . . . . . . . . . . 12 (𝐴 ∈ 𝑉 → (wUniCl‘𝐴) ∈ WUni)
2827wun0 10784 . . . . . . . . . . 11 (𝐴 ∈ 𝑉 → ∅ ∈ (wUniCl‘𝐴))
2928snssd 4747 . . . . . . . . . 10 (𝐴 ∈ 𝑉 → {∅} ⊆ (wUniCl‘𝐴))
3026, 29eqsstrid 3969 . . . . . . . . 9 (𝐴 ∈ 𝑉 → 1o ⊆ (wUniCl‘𝐴))
3125, 30unssd 4138 . . . . . . . 8 (𝐴 ∈ 𝑉 → (𝐴 ∪ 1o) ⊆ (wUniCl‘𝐴))
3224, 31eqsstrd 3965 . . . . . . 7 (𝐴 ∈ 𝑉 → (𝐹‘∅) ⊆ (wUniCl‘𝐴))
33 simplr 781 . . . . . . . . . . 11 (((𝐴 ∈ 𝑉 ∧ 𝑛 ∈ ω) ∧ (𝐹‘𝑛) ⊆ (wUniCl‘𝐴)) → 𝑛 ∈ ω)
34 fvex 6890 . . . . . . . . . . . . 13 (𝐹‘𝑛) ∈ V
3534uniex 7747 . . . . . . . . . . . . 13 ∪ (𝐹‘𝑛) ∈ V
3634, 35unex 7750 . . . . . . . . . . . 12 ((𝐹‘𝑛) ∪ ∪ (𝐹‘𝑛)) ∈ V
37 prex 5396 . . . . . . . . . . . . . 14 {𝒫 𝑢, ∪ 𝑢} ∈ V
3834mptex 7221 . . . . . . . . . . . . . . 15 (𝑣 ∈ (𝐹‘𝑛) ↦ {𝑢, 𝑣}) ∈ V
3938rnex 7911 . . . . . . . . . . . . . 14 ran (𝑣 ∈ (𝐹‘𝑛) ↦ {𝑢, 𝑣}) ∈ V
4037, 39unex 7750 . . . . . . . . . . . . 13 ({𝒫 𝑢, ∪ 𝑢} ∪ ran (𝑣 ∈ (𝐹‘𝑛) ↦ {𝑢, 𝑣})) ∈ V
4134, 40iunex 7969 . . . . . . . . . . . 12 ∪ 𝑢 ∈ (𝐹‘𝑛)({𝒫 𝑢, ∪ 𝑢} ∪ ran (𝑣 ∈ (𝐹‘𝑛) ↦ {𝑢, 𝑣})) ∈ V
4236, 41unex 7750 . . . . . . . . . . 11 (((𝐹‘𝑛) ∪ ∪ (𝐹‘𝑛)) ∪ ∪ 𝑢 ∈ (𝐹‘𝑛)({𝒫 𝑢, ∪ 𝑢} ∪ ran (𝑣 ∈ (𝐹‘𝑛) ↦ {𝑢, 𝑣}))) ∈ V
43 id 23 . . . . . . . . . . . . . 14 (𝑤 = 𝑧 → 𝑤 = 𝑧)
44 unieq 4878 . . . . . . . . . . . . . 14 (𝑤 = 𝑧 → ∪ 𝑤 = ∪ 𝑧)
4543, 44uneq12d 4116 . . . . . . . . . . . . 13 (𝑤 = 𝑧 → (𝑤 ∪ ∪ 𝑤) = (𝑧 ∪ ∪ 𝑧))
46 pweq 4571 . . . . . . . . . . . . . . . . 17 (𝑢 = 𝑥 → 𝒫 𝑢 = 𝒫 𝑥)
47 unieq 4878 . . . . . . . . . . . . . . . . 17 (𝑢 = 𝑥 → ∪ 𝑢 = ∪ 𝑥)
4846, 47preq12d 4702 . . . . . . . . . . . . . . . 16 (𝑢 = 𝑥 → {𝒫 𝑢, ∪ 𝑢} = {𝒫 𝑥, ∪ 𝑥})
49 preq1 4694 . . . . . . . . . . . . . . . . . 18 (𝑢 = 𝑥 → {𝑢, 𝑣} = {𝑥, 𝑣})
5049mpteq2dv 5199 . . . . . . . . . . . . . . . . 17 (𝑢 = 𝑥 → (𝑣 ∈ 𝑤 ↦ {𝑢, 𝑣}) = (𝑣 ∈ 𝑤 ↦ {𝑥, 𝑣}))
5150rneqd 5920 . . . . . . . . . . . . . . . 16 (𝑢 = 𝑥 → ran (𝑣 ∈ 𝑤 ↦ {𝑢, 𝑣}) = ran (𝑣 ∈ 𝑤 ↦ {𝑥, 𝑣}))
5248, 51uneq12d 4116 . . . . . . . . . . . . . . 15 (𝑢 = 𝑥 → ({𝒫 𝑢, ∪ 𝑢} ∪ ran (𝑣 ∈ 𝑤 ↦ {𝑢, 𝑣})) = ({𝒫 𝑥, ∪ 𝑥} ∪ ran (𝑣 ∈ 𝑤 ↦ {𝑥, 𝑣})))
5352cbviunv 4997 . . . . . . . . . . . . . 14 ∪ 𝑢 ∈ 𝑤 ({𝒫 𝑢, ∪ 𝑢} ∪ ran (𝑣 ∈ 𝑤 ↦ {𝑢, 𝑣})) = ∪ 𝑥 ∈ 𝑤 ({𝒫 𝑥, ∪ 𝑥} ∪ ran (𝑣 ∈ 𝑤 ↦ {𝑥, 𝑣}))
54 preq2 4695 . . . . . . . . . . . . . . . . . . 19 (𝑣 = 𝑦 → {𝑥, 𝑣} = {𝑥, 𝑦})
5554cbvmptv 5209 . . . . . . . . . . . . . . . . . 18 (𝑣 ∈ 𝑤 ↦ {𝑥, 𝑣}) = (𝑦 ∈ 𝑤 ↦ {𝑥, 𝑦})
56 mpteq1 5194 . . . . . . . . . . . . . . . . . 18 (𝑤 = 𝑧 → (𝑦 ∈ 𝑤 ↦ {𝑥, 𝑦}) = (𝑦 ∈ 𝑧 ↦ {𝑥, 𝑦}))
5755, 56eqtrid 2808 . . . . . . . . . . . . . . . . 17 (𝑤 = 𝑧 → (𝑣 ∈ 𝑤 ↦ {𝑥, 𝑣}) = (𝑦 ∈ 𝑧 ↦ {𝑥, 𝑦}))
5857rneqd 5920 . . . . . . . . . . . . . . . 16 (𝑤 = 𝑧 → ran (𝑣 ∈ 𝑤 ↦ {𝑥, 𝑣}) = ran (𝑦 ∈ 𝑧 ↦ {𝑥, 𝑦}))
5958uneq2d 4115 . . . . . . . . . . . . . . 15 (𝑤 = 𝑧 → ({𝒫 𝑥, ∪ 𝑥} ∪ ran (𝑣 ∈ 𝑤 ↦ {𝑥, 𝑣})) = ({𝒫 𝑥, ∪ 𝑥} ∪ ran (𝑦 ∈ 𝑧 ↦ {𝑥, 𝑦})))
6043, 59iuneq12d 4980 . . . . . . . . . . . . . 14 (𝑤 = 𝑧 → ∪ 𝑥 ∈ 𝑤 ({𝒫 𝑥, ∪ 𝑥} ∪ ran (𝑣 ∈ 𝑤 ↦ {𝑥, 𝑣})) = ∪ 𝑥 ∈ 𝑧 ({𝒫 𝑥, ∪ 𝑥} ∪ ran (𝑦 ∈ 𝑧 ↦ {𝑥, 𝑦})))
6153, 60eqtrid 2808 . . . . . . . . . . . . 13 (𝑤 = 𝑧 → ∪ 𝑢 ∈ 𝑤 ({𝒫 𝑢, ∪ 𝑢} ∪ ran (𝑣 ∈ 𝑤 ↦ {𝑢, 𝑣})) = ∪ 𝑥 ∈ 𝑧 ({𝒫 𝑥, ∪ 𝑥} ∪ ran (𝑦 ∈ 𝑧 ↦ {𝑥, 𝑦})))
6245, 61uneq12d 4116 . . . . . . . . . . . 12 (𝑤 = 𝑧 → ((𝑤 ∪ ∪ 𝑤) ∪ ∪ 𝑢 ∈ 𝑤 ({𝒫 𝑢, ∪ 𝑢} ∪ ran (𝑣 ∈ 𝑤 ↦ {𝑢, 𝑣}))) = ((𝑧 ∪ ∪ 𝑧) ∪ ∪ 𝑥 ∈ 𝑧 ({𝒫 𝑥, ∪ 𝑥} ∪ ran (𝑦 ∈ 𝑧 ↦ {𝑥, 𝑦}))))
63 id 23 . . . . . . . . . . . . . 14 (𝑤 = (𝐹‘𝑛) → 𝑤 = (𝐹‘𝑛))
64 unieq 4878 . . . . . . . . . . . . . 14 (𝑤 = (𝐹‘𝑛) → ∪ 𝑤 = ∪ (𝐹‘𝑛))
6563, 64uneq12d 4116 . . . . . . . . . . . . 13 (𝑤 = (𝐹‘𝑛) → (𝑤 ∪ ∪ 𝑤) = ((𝐹‘𝑛) ∪ ∪ (𝐹‘𝑛)))
66 mpteq1 5194 . . . . . . . . . . . . . . . 16 (𝑤 = (𝐹‘𝑛) → (𝑣 ∈ 𝑤 ↦ {𝑢, 𝑣}) = (𝑣 ∈ (𝐹‘𝑛) ↦ {𝑢, 𝑣}))
6766rneqd 5920 . . . . . . . . . . . . . . 15 (𝑤 = (𝐹‘𝑛) → ran (𝑣 ∈ 𝑤 ↦ {𝑢, 𝑣}) = ran (𝑣 ∈ (𝐹‘𝑛) ↦ {𝑢, 𝑣}))
6867uneq2d 4115 . . . . . . . . . . . . . 14 (𝑤 = (𝐹‘𝑛) → ({𝒫 𝑢, ∪ 𝑢} ∪ ran (𝑣 ∈ 𝑤 ↦ {𝑢, 𝑣})) = ({𝒫 𝑢, ∪ 𝑢} ∪ ran (𝑣 ∈ (𝐹‘𝑛) ↦ {𝑢, 𝑣})))
6963, 68iuneq12d 4980 . . . . . . . . . . . . 13 (𝑤 = (𝐹‘𝑛) → ∪ 𝑢 ∈ 𝑤 ({𝒫 𝑢, ∪ 𝑢} ∪ ran (𝑣 ∈ 𝑤 ↦ {𝑢, 𝑣})) = ∪ 𝑢 ∈ (𝐹‘𝑛)({𝒫 𝑢, ∪ 𝑢} ∪ ran (𝑣 ∈ (𝐹‘𝑛) ↦ {𝑢, 𝑣})))
7065, 69uneq12d 4116 . . . . . . . . . . . 12 (𝑤 = (𝐹‘𝑛) → ((𝑤 ∪ ∪ 𝑤) ∪ ∪ 𝑢 ∈ 𝑤 ({𝒫 𝑢, ∪ 𝑢} ∪ ran (𝑣 ∈ 𝑤 ↦ {𝑢, 𝑣}))) = (((𝐹‘𝑛) ∪ ∪ (𝐹‘𝑛)) ∪ ∪ 𝑢 ∈ (𝐹‘𝑛)({𝒫 𝑢, ∪ 𝑢} ∪ ran (𝑣 ∈ (𝐹‘𝑛) ↦ {𝑢, 𝑣}))))
711, 62, 70frsucmpt2 8432 . . . . . . . . . . 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 3931 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ 𝑉 ∧ 𝑛 ∈ ω) ∧ (𝐹‘𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹‘𝑛)) → 𝑢 ∈ (wUniCl‘𝐴))
7674, 75wunelss 10774 . . . . . . . . . . . . . 14 ((((𝐴 ∈ 𝑉 ∧ 𝑛 ∈ ω) ∧ (𝐹‘𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹‘𝑛)) → 𝑢 ⊆ (wUniCl‘𝐴))
7776ralrimiva 3155 . . . . . . . . . . . . 13 (((𝐴 ∈ 𝑉 ∧ 𝑛 ∈ ω) ∧ (𝐹‘𝑛) ⊆ (wUniCl‘𝐴)) → ∀𝑢 ∈ (𝐹‘𝑛)𝑢 ⊆ (wUniCl‘𝐴))
78 unissb 4901 . . . . . . . . . . . . 13 (∪ (𝐹‘𝑛) ⊆ (wUniCl‘𝐴) ↔ ∀𝑢 ∈ (𝐹‘𝑛)𝑢 ⊆ (wUniCl‘𝐴))
7977, 78sylibr 237 . . . . . . . . . . . 12 (((𝐴 ∈ 𝑉 ∧ 𝑛 ∈ ω) ∧ (𝐹‘𝑛) ⊆ (wUniCl‘𝐴)) → ∪ (𝐹‘𝑛) ⊆ (wUniCl‘𝐴))
8073, 79unssd 4138 . . . . . . . . . . 11 (((𝐴 ∈ 𝑉 ∧ 𝑛 ∈ ω) ∧ (𝐹‘𝑛) ⊆ (wUniCl‘𝐴)) → ((𝐹‘𝑛) ∪ ∪ (𝐹‘𝑛)) ⊆ (wUniCl‘𝐴))
8174, 75wunpw 10773 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ 𝑉 ∧ 𝑛 ∈ ω) ∧ (𝐹‘𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹‘𝑛)) → 𝒫 𝑢 ∈ (wUniCl‘𝐴))
8274, 75wununi 10772 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ 𝑉 ∧ 𝑛 ∈ ω) ∧ (𝐹‘𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹‘𝑛)) → ∪ 𝑢 ∈ (wUniCl‘𝐴))
8381, 82prssd 4783 . . . . . . . . . . . . . 14 ((((𝐴 ∈ 𝑉 ∧ 𝑛 ∈ ω) ∧ (𝐹‘𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹‘𝑛)) → {𝒫 𝑢, ∪ 𝑢} ⊆ (wUniCl‘𝐴))
8474adantr 486 . . . . . . . . . . . . . . . . 17 (((((𝐴 ∈ 𝑉 ∧ 𝑛 ∈ ω) ∧ (𝐹‘𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹‘𝑛)) ∧ 𝑣 ∈ (𝐹‘𝑛)) → (wUniCl‘𝐴) ∈ WUni)
8575adantr 486 . . . . . . . . . . . . . . . . 17 (((((𝐴 ∈ 𝑉 ∧ 𝑛 ∈ ω) ∧ (𝐹‘𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹‘𝑛)) ∧ 𝑣 ∈ (𝐹‘𝑛)) → 𝑢 ∈ (wUniCl‘𝐴))
86 simplr 781 . . . . . . . . . . . . . . . . . 18 ((((𝐴 ∈ 𝑉 ∧ 𝑛 ∈ ω) ∧ (𝐹‘𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹‘𝑛)) → (𝐹‘𝑛) ⊆ (wUniCl‘𝐴))
8786sselda 3931 . . . . . . . . . . . . . . . . 17 (((((𝐴 ∈ 𝑉 ∧ 𝑛 ∈ ω) ∧ (𝐹‘𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹‘𝑛)) ∧ 𝑣 ∈ (𝐹‘𝑛)) → 𝑣 ∈ (wUniCl‘𝐴))
8884, 85, 87wunpr 10775 . . . . . . . . . . . . . . . 16 (((((𝐴 ∈ 𝑉 ∧ 𝑛 ∈ ω) ∧ (𝐹‘𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹‘𝑛)) ∧ 𝑣 ∈ (𝐹‘𝑛)) → {𝑢, 𝑣} ∈ (wUniCl‘𝐴))
8988fmpttd 7107 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ 𝑉 ∧ 𝑛 ∈ ω) ∧ (𝐹‘𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹‘𝑛)) → (𝑣 ∈ (𝐹‘𝑛) ↦ {𝑢, 𝑣}):(𝐹‘𝑛)⟶(wUniCl‘𝐴))
9089frnd 6710 . . . . . . . . . . . . . 14 ((((𝐴 ∈ 𝑉 ∧ 𝑛 ∈ ω) ∧ (𝐹‘𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹‘𝑛)) → ran (𝑣 ∈ (𝐹‘𝑛) ↦ {𝑢, 𝑣}) ⊆ (wUniCl‘𝐴))
9183, 90unssd 4138 . . . . . . . . . . . . 13 ((((𝐴 ∈ 𝑉 ∧ 𝑛 ∈ ω) ∧ (𝐹‘𝑛) ⊆ (wUniCl‘𝐴)) ∧ 𝑢 ∈ (𝐹‘𝑛)) → ({𝒫 𝑢, ∪ 𝑢} ∪ ran (𝑣 ∈ (𝐹‘𝑛) ↦ {𝑢, 𝑣})) ⊆ (wUniCl‘𝐴))
9291ralrimiva 3155 . . . . . . . . . . . 12 (((𝐴 ∈ 𝑉 ∧ 𝑛 ∈ ω) ∧ (𝐹‘𝑛) ⊆ (wUniCl‘𝐴)) → ∀𝑢 ∈ (𝐹‘𝑛)({𝒫 𝑢, ∪ 𝑢} ∪ ran (𝑣 ∈ (𝐹‘𝑛) ↦ {𝑢, 𝑣})) ⊆ (wUniCl‘𝐴))
93 iunss 5003 . . . . . . . . . . . 12 (∪ 𝑢 ∈ (𝐹‘𝑛)({𝒫 𝑢, ∪ 𝑢} ∪ ran (𝑣 ∈ (𝐹‘𝑛) ↦ {𝑢, 𝑣})) ⊆ (wUniCl‘𝐴) ↔ ∀𝑢 ∈ (𝐹‘𝑛)({𝒫 𝑢, ∪ 𝑢} ∪ ran (𝑣 ∈ (𝐹‘𝑛) ↦ {𝑢, 𝑣})) ⊆ (wUniCl‘𝐴))
9492, 93sylibr 237 . . . . . . . . . . 11 (((𝐴 ∈ 𝑉 ∧ 𝑛 ∈ ω) ∧ (𝐹‘𝑛) ⊆ (wUniCl‘𝐴)) → ∪ 𝑢 ∈ (𝐹‘𝑛)({𝒫 𝑢, ∪ 𝑢} ∪ ran (𝑣 ∈ (𝐹‘𝑛) ↦ {𝑢, 𝑣})) ⊆ (wUniCl‘𝐴))
9580, 94unssd 4138 . . . . . . . . . 10 (((𝐴 ∈ 𝑉 ∧ 𝑛 ∈ ω) ∧ (𝐹‘𝑛) ⊆ (wUniCl‘𝐴)) → (((𝐹‘𝑛) ∪ ∪ (𝐹‘𝑛)) ∪ ∪ 𝑢 ∈ (𝐹‘𝑛)({𝒫 𝑢, ∪ 𝑢} ∪ ran (𝑣 ∈ (𝐹‘𝑛) ↦ {𝑢, 𝑣}))) ⊆ (wUniCl‘𝐴))
9672, 95eqsstrd 3965 . . . . . . . . 9 (((𝐴 ∈ 𝑉 ∧ 𝑛 ∈ ω) ∧ (𝐹‘𝑛) ⊆ (wUniCl‘𝐴)) → (𝐹‘suc 𝑛) ⊆ (wUniCl‘𝐴))
9796ex 418 . . . . . . . 8 ((𝐴 ∈ 𝑉 ∧ 𝑛 ∈ ω) → ((𝐹‘𝑛) ⊆ (wUniCl‘𝐴) → (𝐹‘suc 𝑛) ⊆ (wUniCl‘𝐴)))
9897expcom 419 . . . . . . 7 (𝑛 ∈ ω → (𝐴 ∈ 𝑉 → ((𝐹‘𝑛) ⊆ (wUniCl‘𝐴) → (𝐹‘suc 𝑛) ⊆ (wUniCl‘𝐴))))
9913, 15, 17, 32, 98finds2 7899 . . . . . 6 (𝑚 ∈ ω → (𝐴 ∈ 𝑉 → (𝐹‘𝑚) ⊆ (wUniCl‘𝐴)))
10099com12 33 . . . . 5 (𝐴 ∈ 𝑉 → (𝑚 ∈ ω → (𝐹‘𝑚) ⊆ (wUniCl‘𝐴)))
101100ralrimiv 3154 . . . 4 (𝐴 ∈ 𝑉 → ∀𝑚 ∈ ω (𝐹‘𝑚) ⊆ (wUniCl‘𝐴))
102 iunss 5003 . . . 4 (∪ 𝑚 ∈ ω (𝐹‘𝑚) ⊆ (wUniCl‘𝐴) ↔ ∀𝑚 ∈ ω (𝐹‘𝑚) ⊆ (wUniCl‘𝐴))
103101, 102sylibr 237 . . 3 (𝐴 ∈ 𝑉 → ∪ 𝑚 ∈ ω (𝐹‘𝑚) ⊆ (wUniCl‘𝐴))
10411, 103eqsstrid 3969 . 2 (𝐴 ∈ 𝑉 → 𝑈 ⊆ (wUniCl‘𝐴))
1055, 104eqssd 3948 1 (𝐴 ∈ 𝑉 → (wUniCl‘𝐴) = 𝑈)
Colors of variables:    wff setvar class
This proof depends on syntax axioms:   → wi 4   ∧ wa 401   = wceq 1570   ∈ wcel 2145  ∀wral 3077  Vcvv 3451   ∪ cun 3897   ⊆ wss 3899  ∅c0 4279  𝒫 cpw 4557  {csn 4584  {cpr 4586  ∪ cuni 4867  ∪ ciun 4951   ↦ cmpt 5186  ran crn 5652   ↾ cres 5653  Oncon0 6355  suc csuc 6357   Fn wfn 6526  ‘cfv 6531  ωcom 7866  reccrdg 8401  1oc1o 8453  WUnicwun 10766  wUniClcwunm 10767
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 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2733  ax-rep 5232  ax-sep 5249  ax-nul 5260  ax-pow 5327  ax-pr 5391  ax-un 7740  ax-inf2 9626
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 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-ral 3078  df-rex 3088  df-reu 3367  df-rab 3414  df-v 3453  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-int 4908  df-iun 4953  df-iin 4954  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  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 6297  df-ord 6358  df-on 6359  df-lim 6360  df-suc 6361  df-iota 6487  df-fun 6533  df-fn 6534  df-f 6535  df-f1 6536  df-fo 6537  df-f1o 6538  df-fv 6539  df-ov 7415  df-om 7867  df-2nd 7991  df-frecs 8283  df-wrecs 8314  df-recs 8363  df-rdg 8402  df-1o 8460  df-wun 10768  df-wunc 10769
This theorem is used by: (None)
  Copyright terms: Public domain W3C validator