Theorem rdgssun 37946

Description: In a recursive definition where each step expands on the previous one using a union, every previous step is a subset of every later step. (Contributed by ML, 1-Apr-2022.)

Hypotheses

Ref	Expression
rdgssun.1	⊢ 𝐹 = (𝑤 ∈ V ↦ (𝑤 ∪ 𝐵))
rdgssun.2	⊢ 𝐵 ∈ V

Assertion

Ref	Expression
rdgssun	⊢ ((𝑋 ∈ On ∧ 𝑌 ∈ 𝑋) → (rec(𝐹, 𝐴)‘𝑌) ⊆ (rec(𝐹, 𝐴)‘𝑋))

Distinct variable groups:   𝑤,𝐴   𝑤,𝑌

Allowed substitution hints:   𝐵(𝑤)   𝐹(𝑤)   𝑋(𝑤)

Proof of Theorem rdgssun

Dummy variables 𝑥 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		nfsbc1v 3773	. . . . . . . . . . . 12 ⊢ Ⅎ𝑥[∅ / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)
2		0ex 5272	. . . . . . . . . . . 12 ⊢ ∅ ∈ V
3		rzal 4460	. . . . . . . . . . . . 13 ⊢ (𝑥 = ∅ → ∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥))
4		sbceq1a 3764	. . . . . . . . . . . . 13 ⊢ (𝑥 = ∅ → (∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) ↔ [∅ / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)))
5	3, 4	mpbid 235	. . . . . . . . . . . 12 ⊢ (𝑥 = ∅ → [∅ / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥))
6	1, 2, 5	vtoclef 3538	. . . . . . . . . . 11 ⊢ [∅ / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)
7		vex 3467	. . . . . . . . . . . . . . . 16 ⊢ 𝑦 ∈ V
8	7	elsuc 6434	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ suc 𝑥 ↔ (𝑦 ∈ 𝑥 ∨ 𝑦 = 𝑥))
9		ssun1 4139	. . . . . . . . . . . . . . . . . . . 20 ⊢ (rec(𝐹, 𝐴)‘𝑥) ⊆ ((rec(𝐹, 𝐴)‘𝑥) ∪ ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵)
10		fvex 6895	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (rec(𝐹, 𝐴)‘𝑥) ∈ V
11		rdgssun.2	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ 𝐵 ∈ V
12	11	csbex 5276	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵 ∈ V
13	10, 12	unex 7743	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((rec(𝐹, 𝐴)‘𝑥) ∪ ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵) ∈ V
14		nfcv 2931	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ Ⅎ𝑤𝐴
15		nfcv 2931	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ Ⅎ𝑤𝑥
16		rdgssun.1	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ 𝐹 = (𝑤 ∈ V ↦ (𝑤 ∪ 𝐵))
17		nfmpt1 5214	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ Ⅎ𝑤(𝑤 ∈ V ↦ (𝑤 ∪ 𝐵))
18	16, 17	nfcxfr 2929	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ Ⅎ𝑤𝐹
19	18, 14	nfrdg 8401	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ Ⅎ𝑤rec(𝐹, 𝐴)
20	19, 15	nffv 6892	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ Ⅎ𝑤(rec(𝐹, 𝐴)‘𝑥)
21	20	nfcsb1 3884	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ Ⅎ𝑤⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵
22	20, 21	nfun 4132	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ Ⅎ𝑤((rec(𝐹, 𝐴)‘𝑥) ∪ ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵)
23		rdgeq1 8398	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝐹 = (𝑤 ∈ V ↦ (𝑤 ∪ 𝐵)) → rec(𝐹, 𝐴) = rec((𝑤 ∈ V ↦ (𝑤 ∪ 𝐵)), 𝐴))
24	16, 23	ax-mp 5	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ rec(𝐹, 𝐴) = rec((𝑤 ∈ V ↦ (𝑤 ∪ 𝐵)), 𝐴)
25		id 23	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑤 = (rec(𝐹, 𝐴)‘𝑥) → 𝑤 = (rec(𝐹, 𝐴)‘𝑥))
26		csbeq1a 3875	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑤 = (rec(𝐹, 𝐴)‘𝑥) → 𝐵 = ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵)
27	25, 26	uneq12d 4131	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑤 = (rec(𝐹, 𝐴)‘𝑥) → (𝑤 ∪ 𝐵) = ((rec(𝐹, 𝐴)‘𝑥) ∪ ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵))
28	14, 15, 22, 24, 27	rdgsucmptf 8415	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑥 ∈ On ∧ ((rec(𝐹, 𝐴)‘𝑥) ∪ ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵) ∈ V) → (rec(𝐹, 𝐴)‘suc 𝑥) = ((rec(𝐹, 𝐴)‘𝑥) ∪ ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵))
29	13, 28	mpan2 703	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 ∈ On → (rec(𝐹, 𝐴)‘suc 𝑥) = ((rec(𝐹, 𝐴)‘𝑥) ∪ ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵))
30	9, 29	sseqtrrid 3988	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 ∈ On → (rec(𝐹, 𝐴)‘𝑥) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥))
31		sstr2 3952	. . . . . . . . . . . . . . . . . . 19 ⊢ ((rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) → ((rec(𝐹, 𝐴)‘𝑥) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥) → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
32	30, 31	syl5com 32	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 ∈ On → ((rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
33	32	imim2d 58	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 ∈ On → ((𝑦 ∈ 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)) → (𝑦 ∈ 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥))))
34	33	imp 411	. . . . . . . . . . . . . . . 16 ⊢ ((𝑥 ∈ On ∧ (𝑦 ∈ 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥))) → (𝑦 ∈ 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
35		fveq2 6882	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 = 𝑥 → (rec(𝐹, 𝐴)‘𝑦) = (rec(𝐹, 𝐴)‘𝑥))
36	35	sseq1d 3976	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 = 𝑥 → ((rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥) ↔ (rec(𝐹, 𝐴)‘𝑥) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
37	30, 36	syl5ibrcom 250	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 ∈ On → (𝑦 = 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
38	37	adantr 485	. . . . . . . . . . . . . . . 16 ⊢ ((𝑥 ∈ On ∧ (𝑦 ∈ 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥))) → (𝑦 = 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
39	34, 38	jaod 872	. . . . . . . . . . . . . . 15 ⊢ ((𝑥 ∈ On ∧ (𝑦 ∈ 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥))) → ((𝑦 ∈ 𝑥 ∨ 𝑦 = 𝑥) → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
40	8, 39	biimtrid 245	. . . . . . . . . . . . . 14 ⊢ ((𝑥 ∈ On ∧ (𝑦 ∈ 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥))) → (𝑦 ∈ suc 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
41	40	ex 417	. . . . . . . . . . . . 13 ⊢ (𝑥 ∈ On → ((𝑦 ∈ 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)) → (𝑦 ∈ suc 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥))))
42	41	ralimdv2 3180	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ On → (∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) → ∀𝑦 ∈ suc 𝑥(rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
43		df-sbc 3754	. . . . . . . . . . . . 13 ⊢ ([suc 𝑥 / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) ↔ suc 𝑥 ∈ {𝑥 ∣ ∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)})
44		vex 3467	. . . . . . . . . . . . . . 15 ⊢ 𝑥 ∈ V
45	44	sucex 7805	. . . . . . . . . . . . . 14 ⊢ suc 𝑥 ∈ V
46		fveq2 6882	. . . . . . . . . . . . . . . 16 ⊢ (𝑧 = suc 𝑥 → (rec(𝐹, 𝐴)‘𝑧) = (rec(𝐹, 𝐴)‘suc 𝑥))
47	46	sseq2d 3977	. . . . . . . . . . . . . . 15 ⊢ (𝑧 = suc 𝑥 → ((rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧) ↔ (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
48	47	raleqbi1dv 3339	. . . . . . . . . . . . . 14 ⊢ (𝑧 = suc 𝑥 → (∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧) ↔ ∀𝑦 ∈ suc 𝑥(rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
49		fveq2 6882	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 = 𝑧 → (rec(𝐹, 𝐴)‘𝑥) = (rec(𝐹, 𝐴)‘𝑧))
50	49	sseq2d 3977	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑧 → ((rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) ↔ (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧)))
51	50	raleqbi1dv 3339	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑧 → (∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) ↔ ∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧)))
52	51	cbvabv 2839	. . . . . . . . . . . . . 14 ⊢ {𝑥 ∣ ∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)} = {𝑧 ∣ ∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧)}
53	45, 48, 52	elab2 3650	. . . . . . . . . . . . 13 ⊢ (suc 𝑥 ∈ {𝑥 ∣ ∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)} ↔ ∀𝑦 ∈ suc 𝑥(rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥))
54	43, 53	bitri 278	. . . . . . . . . . . 12 ⊢ ([suc 𝑥 / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) ↔ ∀𝑦 ∈ suc 𝑥(rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥))
55	42, 54	imbitrrdi 255	. . . . . . . . . . 11 ⊢ (𝑥 ∈ On → (∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) → [suc 𝑥 / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)))
56		ssiun2 5016	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ 𝑧 → (rec(𝐹, 𝐴)‘𝑦) ⊆ ∪ 𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦))
57	56	adantl 486	. . . . . . . . . . . . . . 15 ⊢ ((Lim 𝑧 ∧ 𝑦 ∈ 𝑧) → (rec(𝐹, 𝐴)‘𝑦) ⊆ ∪ 𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦))
58		vex 3467	. . . . . . . . . . . . . . . . 17 ⊢ 𝑧 ∈ V
59		rdglim2a 8420	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑧 ∈ V ∧ Lim 𝑧) → (rec(𝐹, 𝐴)‘𝑧) = ∪ 𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦))
60	58, 59	mpan 702	. . . . . . . . . . . . . . . 16 ⊢ (Lim 𝑧 → (rec(𝐹, 𝐴)‘𝑧) = ∪ 𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦))
61	60	adantr 485	. . . . . . . . . . . . . . 15 ⊢ ((Lim 𝑧 ∧ 𝑦 ∈ 𝑧) → (rec(𝐹, 𝐴)‘𝑧) = ∪ 𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦))
62	57, 61	sseqtrrd 3982	. . . . . . . . . . . . . 14 ⊢ ((Lim 𝑧 ∧ 𝑦 ∈ 𝑧) → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧))
63	62	ralrimiva 3163	. . . . . . . . . . . . 13 ⊢ (Lim 𝑧 → ∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧))
64		df-sbc 3754	. . . . . . . . . . . . . . 15 ⊢ ([𝑧 / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) ↔ 𝑧 ∈ {𝑥 ∣ ∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)})
65	52	eleq2i 2861	. . . . . . . . . . . . . . 15 ⊢ (𝑧 ∈ {𝑥 ∣ ∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)} ↔ 𝑧 ∈ {𝑧 ∣ ∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧)})
66	64, 65	bitri 278	. . . . . . . . . . . . . 14 ⊢ ([𝑧 / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) ↔ 𝑧 ∈ {𝑧 ∣ ∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧)})
67		abid 2751	. . . . . . . . . . . . . 14 ⊢ (𝑧 ∈ {𝑧 ∣ ∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧)} ↔ ∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧))
68	66, 67	bitri 278	. . . . . . . . . . . . 13 ⊢ ([𝑧 / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) ↔ ∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧))
69	63, 68	sylibr 237	. . . . . . . . . . . 12 ⊢ (Lim 𝑧 → [𝑧 / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥))
70	69	a1d 26	. . . . . . . . . . 11 ⊢ (Lim 𝑧 → (∀𝑥 ∈ 𝑧 ∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) → [𝑧 / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)))
71	6, 55, 70	tfindes 7859	. . . . . . . . . 10 ⊢ (𝑥 ∈ On → ∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥))
72		rsp 3259	. . . . . . . . . 10 ⊢ (∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) → (𝑦 ∈ 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)))
73	71, 72	syl 18	. . . . . . . . 9 ⊢ (𝑥 ∈ On → (𝑦 ∈ 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)))
74		eleq1 2857	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑋 → (𝑥 ∈ On ↔ 𝑋 ∈ On))
75	74	adantl 486	. . . . . . . . . 10 ⊢ ((𝑦 = 𝑌 ∧ 𝑥 = 𝑋) → (𝑥 ∈ On ↔ 𝑋 ∈ On))
76		eleq12 2859	. . . . . . . . . . 11 ⊢ ((𝑦 = 𝑌 ∧ 𝑥 = 𝑋) → (𝑦 ∈ 𝑥 ↔ 𝑌 ∈ 𝑋))
77		fveq2 6882	. . . . . . . . . . . . 13 ⊢ (𝑦 = 𝑌 → (rec(𝐹, 𝐴)‘𝑦) = (rec(𝐹, 𝐴)‘𝑌))
78	77	adantr 485	. . . . . . . . . . . 12 ⊢ ((𝑦 = 𝑌 ∧ 𝑥 = 𝑋) → (rec(𝐹, 𝐴)‘𝑦) = (rec(𝐹, 𝐴)‘𝑌))
79		fveq2 6882	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑋 → (rec(𝐹, 𝐴)‘𝑥) = (rec(𝐹, 𝐴)‘𝑋))
80	79	adantl 486	. . . . . . . . . . . 12 ⊢ ((𝑦 = 𝑌 ∧ 𝑥 = 𝑋) → (rec(𝐹, 𝐴)‘𝑥) = (rec(𝐹, 𝐴)‘𝑋))
81	78, 80	sseq12d 3978	. . . . . . . . . . 11 ⊢ ((𝑦 = 𝑌 ∧ 𝑥 = 𝑋) → ((rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) ↔ (rec(𝐹, 𝐴)‘𝑌) ⊆ (rec(𝐹, 𝐴)‘𝑋)))
82	76, 81	imbi12d 347	. . . . . . . . . 10 ⊢ ((𝑦 = 𝑌 ∧ 𝑥 = 𝑋) → ((𝑦 ∈ 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)) ↔ (𝑌 ∈ 𝑋 → (rec(𝐹, 𝐴)‘𝑌) ⊆ (rec(𝐹, 𝐴)‘𝑋))))
83	75, 82	imbi12d 347	. . . . . . . . 9 ⊢ ((𝑦 = 𝑌 ∧ 𝑥 = 𝑋) → ((𝑥 ∈ On → (𝑦 ∈ 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥))) ↔ (𝑋 ∈ On → (𝑌 ∈ 𝑋 → (rec(𝐹, 𝐴)‘𝑌) ⊆ (rec(𝐹, 𝐴)‘𝑋)))))
84	73, 83	mpbii 236	. . . . . . . 8 ⊢ ((𝑦 = 𝑌 ∧ 𝑥 = 𝑋) → (𝑋 ∈ On → (𝑌 ∈ 𝑋 → (rec(𝐹, 𝐴)‘𝑌) ⊆ (rec(𝐹, 𝐴)‘𝑋))))
85	84	ex 417	. . . . . . 7 ⊢ (𝑦 = 𝑌 → (𝑥 = 𝑋 → (𝑋 ∈ On → (𝑌 ∈ 𝑋 → (rec(𝐹, 𝐴)‘𝑌) ⊆ (rec(𝐹, 𝐴)‘𝑋)))))
86	85	vtocleg 3530	. . . . . 6 ⊢ (𝑌 ∈ 𝑋 → (𝑥 = 𝑋 → (𝑋 ∈ On → (𝑌 ∈ 𝑋 → (rec(𝐹, 𝐴)‘𝑌) ⊆ (rec(𝐹, 𝐴)‘𝑋)))))
87	86	com12 33	. . . . 5 ⊢ (𝑥 = 𝑋 → (𝑌 ∈ 𝑋 → (𝑋 ∈ On → (𝑌 ∈ 𝑋 → (rec(𝐹, 𝐴)‘𝑌) ⊆ (rec(𝐹, 𝐴)‘𝑋)))))
88	87	vtocleg 3530	. . . 4 ⊢ (𝑋 ∈ On → (𝑌 ∈ 𝑋 → (𝑋 ∈ On → (𝑌 ∈ 𝑋 → (rec(𝐹, 𝐴)‘𝑌) ⊆ (rec(𝐹, 𝐴)‘𝑋)))))
89	88	pm2.43b 56	. . 3 ⊢ (𝑌 ∈ 𝑋 → (𝑋 ∈ On → (𝑌 ∈ 𝑋 → (rec(𝐹, 𝐴)‘𝑌) ⊆ (rec(𝐹, 𝐴)‘𝑋))))
90	89	pm2.43b 56	. 2 ⊢ (𝑋 ∈ On → (𝑌 ∈ 𝑋 → (rec(𝐹, 𝐴)‘𝑌) ⊆ (rec(𝐹, 𝐴)‘𝑋)))
91	90	imp 411	1 ⊢ ((𝑋 ∈ On ∧ 𝑌 ∈ 𝑋) → (rec(𝐹, 𝐴)‘𝑌) ⊆ (rec(𝐹, 𝐴)‘𝑋))

Syntax hints:   → wi 4   ↔ wb 209   ∧ wa 400   ∨ wo 860   = wceq 1567   ∈ wcel 2149  {cab 2747  ∀wral 3085  Vcvv 3463  [wsbc 3753  ⦋csb 3861   ∪ cun 3911   ⊆ wss 3913  ∅c0 4294  ∪ ciun 4960   ↦ cmpt 5196  Oncon0 6361  Lim wlim 6362  suc csuc 6363  ‘cfv 6537  reccrdg 8396

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1822  ax-4 1836  ax-5 1937  ax-6 1994  ax-7 2035  ax-8 2151  ax-9 2159  ax-10 2182  ax-11 2198  ax-12 2219  ax-ext 2741  ax-rep 5242  ax-sep 5261  ax-nul 5271  ax-pr 5405  ax-un 7733

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1102  df-3an 1103  df-tru 1570  df-fal 1580  df-ex 1807  df-nf 1811  df-sb 2098  df-mo 2573  df-eu 2603  df-clab 2748  df-cleq 2761  df-clel 2844  df-nfc 2918  df-ne 2965  df-ral 3086  df-rex 3096  df-reu 3377  df-rab 3424  df-v 3465  df-sbc 3754  df-csb 3862  df-dif 3916  df-un 3918  df-in 3920  df-ss 3930  df-pss 3933  df-nul 4295  df-if 4493  df-pw 4569  df-sn 4595  df-pr 4597  df-op 4601  df-uni 4877  df-iun 4962  df-br 5114  df-opab 5178  df-mpt 5197  df-tr 5223  df-id 5557  df-eprel 5562  df-po 5570  df-so 5571  df-fr 5615  df-we 5617  df-xp 5668  df-rel 5669  df-cnv 5670  df-co 5671  df-dm 5672  df-rn 5673  df-res 5674  df-ima 5675  df-pred 6303  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-ov 7414  df-2nd 7987  df-frecs 8278  df-wrecs 8309  df-recs 8358  df-rdg 8397

This theorem is referenced by: (None)