| Step | Hyp | Ref
| Expression |
| 1 | | df-ttc 36675 |
. 2
⊢ TC+ 𝐴 = ∪ 𝑥 ∈ 𝐴 ∪ (rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥}) “
ω) |
| 2 | | ssel2 3917 |
. . . . 5
⊢ ((𝐴 ⊆ 𝐵 ∧ 𝑥 ∈ 𝐴) → 𝑥 ∈ 𝐵) |
| 3 | | rdgfun 8346 |
. . . . . . 7
⊢ Fun
rec((𝑦 ∈ V ↦
∪ 𝑦), {𝑥}) |
| 4 | | funiunfv 7194 |
. . . . . . 7
⊢ (Fun
rec((𝑦 ∈ V ↦
∪ 𝑦), {𝑥}) → ∪
𝑧 ∈ ω
(rec((𝑦 ∈ V ↦
∪ 𝑦), {𝑥})‘𝑧) = ∪ (rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥}) “
ω)) |
| 5 | 3, 4 | ax-mp 5 |
. . . . . 6
⊢ ∪ 𝑧 ∈ ω (rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘𝑧) = ∪
(rec((𝑦 ∈ V ↦
∪ 𝑦), {𝑥}) “ ω) |
| 6 | | fveq2 6832 |
. . . . . . . . . 10
⊢ (𝑧 = ∅ → (rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘𝑧) = (rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘∅)) |
| 7 | 6 | sseq1d 3954 |
. . . . . . . . 9
⊢ (𝑧 = ∅ → ((rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘𝑧) ⊆ 𝐵 ↔ (rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘∅) ⊆
𝐵)) |
| 8 | | fveq2 6832 |
. . . . . . . . . 10
⊢ (𝑧 = 𝑤 → (rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘𝑧) = (rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘𝑤)) |
| 9 | 8 | sseq1d 3954 |
. . . . . . . . 9
⊢ (𝑧 = 𝑤 → ((rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘𝑧) ⊆ 𝐵 ↔ (rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘𝑤) ⊆ 𝐵)) |
| 10 | | fveq2 6832 |
. . . . . . . . . 10
⊢ (𝑧 = suc 𝑤 → (rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘𝑧) = (rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘suc 𝑤)) |
| 11 | 10 | sseq1d 3954 |
. . . . . . . . 9
⊢ (𝑧 = suc 𝑤 → ((rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘𝑧) ⊆ 𝐵 ↔ (rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘suc 𝑤) ⊆ 𝐵)) |
| 12 | | vsnex 5370 |
. . . . . . . . . . . 12
⊢ {𝑥} ∈ V |
| 13 | 12 | rdg0 8351 |
. . . . . . . . . . 11
⊢
(rec((𝑦 ∈ V
↦ ∪ 𝑦), {𝑥})‘∅) = {𝑥} |
| 14 | | snssi 4752 |
. . . . . . . . . . 11
⊢ (𝑥 ∈ 𝐵 → {𝑥} ⊆ 𝐵) |
| 15 | 13, 14 | eqsstrid 3961 |
. . . . . . . . . 10
⊢ (𝑥 ∈ 𝐵 → (rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘∅) ⊆
𝐵) |
| 16 | 15 | adantr 480 |
. . . . . . . . 9
⊢ ((𝑥 ∈ 𝐵 ∧ Tr 𝐵) → (rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘∅) ⊆
𝐵) |
| 17 | | nnon 7814 |
. . . . . . . . . . . . 13
⊢ (𝑤 ∈ ω → 𝑤 ∈ On) |
| 18 | | fvex 6845 |
. . . . . . . . . . . . . 14
⊢
(rec((𝑦 ∈ V
↦ ∪ 𝑦), {𝑥})‘𝑤) ∈ V |
| 19 | 18 | uniex 7686 |
. . . . . . . . . . . . 13
⊢ ∪ (rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘𝑤) ∈ V |
| 20 | | eqid 2737 |
. . . . . . . . . . . . . 14
⊢
rec((𝑦 ∈ V
↦ ∪ 𝑦), {𝑥}) = rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥}) |
| 21 | | unieq 4862 |
. . . . . . . . . . . . . 14
⊢ (𝑧 = 𝑦 → ∪ 𝑧 = ∪
𝑦) |
| 22 | | unieq 4862 |
. . . . . . . . . . . . . 14
⊢ (𝑧 = (rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘𝑤) → ∪ 𝑧 =
∪ (rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘𝑤)) |
| 23 | 20, 21, 22 | rdgsucmpt2 8360 |
. . . . . . . . . . . . 13
⊢ ((𝑤 ∈ On ∧ ∪ (rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘𝑤) ∈ V) → (rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘suc 𝑤) = ∪
(rec((𝑦 ∈ V ↦
∪ 𝑦), {𝑥})‘𝑤)) |
| 24 | 17, 19, 23 | sylancl 587 |
. . . . . . . . . . . 12
⊢ (𝑤 ∈ ω →
(rec((𝑦 ∈ V ↦
∪ 𝑦), {𝑥})‘suc 𝑤) = ∪ (rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘𝑤)) |
| 25 | 24 | 3ad2ant1 1134 |
. . . . . . . . . . 11
⊢ ((𝑤 ∈ ω ∧ (𝑥 ∈ 𝐵 ∧ Tr 𝐵) ∧ (rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘𝑤) ⊆ 𝐵) → (rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘suc 𝑤) = ∪
(rec((𝑦 ∈ V ↦
∪ 𝑦), {𝑥})‘𝑤)) |
| 26 | | uniss 4859 |
. . . . . . . . . . . . 13
⊢
((rec((𝑦 ∈ V
↦ ∪ 𝑦), {𝑥})‘𝑤) ⊆ 𝐵 → ∪
(rec((𝑦 ∈ V ↦
∪ 𝑦), {𝑥})‘𝑤) ⊆ ∪ 𝐵) |
| 27 | 26 | 3ad2ant3 1136 |
. . . . . . . . . . . 12
⊢ ((𝑤 ∈ ω ∧ (𝑥 ∈ 𝐵 ∧ Tr 𝐵) ∧ (rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘𝑤) ⊆ 𝐵) → ∪
(rec((𝑦 ∈ V ↦
∪ 𝑦), {𝑥})‘𝑤) ⊆ ∪ 𝐵) |
| 28 | | simp2r 1202 |
. . . . . . . . . . . . 13
⊢ ((𝑤 ∈ ω ∧ (𝑥 ∈ 𝐵 ∧ Tr 𝐵) ∧ (rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘𝑤) ⊆ 𝐵) → Tr 𝐵) |
| 29 | | df-tr 5194 |
. . . . . . . . . . . . 13
⊢ (Tr 𝐵 ↔ ∪ 𝐵
⊆ 𝐵) |
| 30 | 28, 29 | sylib 218 |
. . . . . . . . . . . 12
⊢ ((𝑤 ∈ ω ∧ (𝑥 ∈ 𝐵 ∧ Tr 𝐵) ∧ (rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘𝑤) ⊆ 𝐵) → ∪ 𝐵 ⊆ 𝐵) |
| 31 | 27, 30 | sstrd 3933 |
. . . . . . . . . . 11
⊢ ((𝑤 ∈ ω ∧ (𝑥 ∈ 𝐵 ∧ Tr 𝐵) ∧ (rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘𝑤) ⊆ 𝐵) → ∪
(rec((𝑦 ∈ V ↦
∪ 𝑦), {𝑥})‘𝑤) ⊆ 𝐵) |
| 32 | 25, 31 | eqsstrd 3957 |
. . . . . . . . . 10
⊢ ((𝑤 ∈ ω ∧ (𝑥 ∈ 𝐵 ∧ Tr 𝐵) ∧ (rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘𝑤) ⊆ 𝐵) → (rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘suc 𝑤) ⊆ 𝐵) |
| 33 | 32 | 3exp 1120 |
. . . . . . . . 9
⊢ (𝑤 ∈ ω → ((𝑥 ∈ 𝐵 ∧ Tr 𝐵) → ((rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘𝑤) ⊆ 𝐵 → (rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘suc 𝑤) ⊆ 𝐵))) |
| 34 | 7, 9, 11, 16, 33 | finds2 7840 |
. . . . . . . 8
⊢ (𝑧 ∈ ω → ((𝑥 ∈ 𝐵 ∧ Tr 𝐵) → (rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘𝑧) ⊆ 𝐵)) |
| 35 | 34 | impcom 407 |
. . . . . . 7
⊢ (((𝑥 ∈ 𝐵 ∧ Tr 𝐵) ∧ 𝑧 ∈ ω) → (rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥})‘𝑧) ⊆ 𝐵) |
| 36 | 35 | iunssd 4994 |
. . . . . 6
⊢ ((𝑥 ∈ 𝐵 ∧ Tr 𝐵) → ∪
𝑧 ∈ ω
(rec((𝑦 ∈ V ↦
∪ 𝑦), {𝑥})‘𝑧) ⊆ 𝐵) |
| 37 | 5, 36 | eqsstrrid 3962 |
. . . . 5
⊢ ((𝑥 ∈ 𝐵 ∧ Tr 𝐵) → ∪
(rec((𝑦 ∈ V ↦
∪ 𝑦), {𝑥}) “ ω) ⊆ 𝐵) |
| 38 | 2, 37 | sylan 581 |
. . . 4
⊢ (((𝐴 ⊆ 𝐵 ∧ 𝑥 ∈ 𝐴) ∧ Tr 𝐵) → ∪
(rec((𝑦 ∈ V ↦
∪ 𝑦), {𝑥}) “ ω) ⊆ 𝐵) |
| 39 | 38 | an32s 653 |
. . 3
⊢ (((𝐴 ⊆ 𝐵 ∧ Tr 𝐵) ∧ 𝑥 ∈ 𝐴) → ∪
(rec((𝑦 ∈ V ↦
∪ 𝑦), {𝑥}) “ ω) ⊆ 𝐵) |
| 40 | 39 | iunssd 4994 |
. 2
⊢ ((𝐴 ⊆ 𝐵 ∧ Tr 𝐵) → ∪
𝑥 ∈ 𝐴 ∪ (rec((𝑦 ∈ V ↦ ∪ 𝑦),
{𝑥}) “ ω)
⊆ 𝐵) |
| 41 | 1, 40 | eqsstrid 3961 |
1
⊢ ((𝐴 ⊆ 𝐵 ∧ Tr 𝐵) → TC+ 𝐴 ⊆ 𝐵) |