Theorem rdgssun 37422

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 3756	. . . . . . . . . . . 12 ⊢ Ⅎ𝑥[∅ / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)
2		0ex 5243	. . . . . . . . . . . 12 ⊢ ∅ ∈ V
3		rzal 4456	. . . . . . . . . . . . 13 ⊢ (𝑥 = ∅ → ∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥))
4		sbceq1a 3747	. . . . . . . . . . . . 13 ⊢ (𝑥 = ∅ → (∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) ↔ [∅ / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)))
5	3, 4	mpbid 232	. . . . . . . . . . . 12 ⊢ (𝑥 = ∅ → [∅ / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥))
6	1, 2, 5	vtoclef 3516	. . . . . . . . . . 11 ⊢ [∅ / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)
7		vex 3440	. . . . . . . . . . . . . . . 16 ⊢ 𝑦 ∈ V
8	7	elsuc 6378	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ suc 𝑥 ↔ (𝑦 ∈ 𝑥 ∨ 𝑦 = 𝑥))
9		ssun1 4125	. . . . . . . . . . . . . . . . . . . 20 ⊢ (rec(𝐹, 𝐴)‘𝑥) ⊆ ((rec(𝐹, 𝐴)‘𝑥) ∪ ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵)
10		fvex 6835	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (rec(𝐹, 𝐴)‘𝑥) ∈ V
11		rdgssun.2	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ 𝐵 ∈ V
12	11	csbex 5247	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵 ∈ V
13	10, 12	unex 7677	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((rec(𝐹, 𝐴)‘𝑥) ∪ ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵) ∈ V
14		nfcv 2894	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ Ⅎ𝑤𝐴
15		nfcv 2894	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ Ⅎ𝑤𝑥
16		rdgssun.1	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ 𝐹 = (𝑤 ∈ V ↦ (𝑤 ∪ 𝐵))
17		nfmpt1 5188	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ Ⅎ𝑤(𝑤 ∈ V ↦ (𝑤 ∪ 𝐵))
18	16, 17	nfcxfr 2892	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ Ⅎ𝑤𝐹
19	18, 14	nfrdg 8333	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ Ⅎ𝑤rec(𝐹, 𝐴)
20	19, 15	nffv 6832	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ Ⅎ𝑤(rec(𝐹, 𝐴)‘𝑥)
21	20	nfcsb1 3868	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ Ⅎ𝑤⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵
22	20, 21	nfun 4117	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ Ⅎ𝑤((rec(𝐹, 𝐴)‘𝑥) ∪ ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵)
23		rdgeq1 8330	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝐹 = (𝑤 ∈ V ↦ (𝑤 ∪ 𝐵)) → rec(𝐹, 𝐴) = rec((𝑤 ∈ V ↦ (𝑤 ∪ 𝐵)), 𝐴))
24	16, 23	ax-mp 5	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ rec(𝐹, 𝐴) = rec((𝑤 ∈ V ↦ (𝑤 ∪ 𝐵)), 𝐴)
25		id 22	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑤 = (rec(𝐹, 𝐴)‘𝑥) → 𝑤 = (rec(𝐹, 𝐴)‘𝑥))
26		csbeq1a 3859	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑤 = (rec(𝐹, 𝐴)‘𝑥) → 𝐵 = ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵)
27	25, 26	uneq12d 4116	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑤 = (rec(𝐹, 𝐴)‘𝑥) → (𝑤 ∪ 𝐵) = ((rec(𝐹, 𝐴)‘𝑥) ∪ ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵))
28	14, 15, 22, 24, 27	rdgsucmptf 8347	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑥 ∈ On ∧ ((rec(𝐹, 𝐴)‘𝑥) ∪ ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵) ∈ V) → (rec(𝐹, 𝐴)‘suc 𝑥) = ((rec(𝐹, 𝐴)‘𝑥) ∪ ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵))
29	13, 28	mpan2 691	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 ∈ On → (rec(𝐹, 𝐴)‘suc 𝑥) = ((rec(𝐹, 𝐴)‘𝑥) ∪ ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵))
30	9, 29	sseqtrrid 3973	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 ∈ On → (rec(𝐹, 𝐴)‘𝑥) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥))
31		sstr2 3936	. . . . . . . . . . . . . . . . . . 19 ⊢ ((rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) → ((rec(𝐹, 𝐴)‘𝑥) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥) → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
32	30, 31	syl5com 31	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 ∈ On → ((rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
33	32	imim2d 57	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 ∈ On → ((𝑦 ∈ 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)) → (𝑦 ∈ 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥))))
34	33	imp 406	. . . . . . . . . . . . . . . 16 ⊢ ((𝑥 ∈ On ∧ (𝑦 ∈ 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥))) → (𝑦 ∈ 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
35		fveq2 6822	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 = 𝑥 → (rec(𝐹, 𝐴)‘𝑦) = (rec(𝐹, 𝐴)‘𝑥))
36	35	sseq1d 3961	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 = 𝑥 → ((rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥) ↔ (rec(𝐹, 𝐴)‘𝑥) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
37	30, 36	syl5ibrcom 247	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 ∈ On → (𝑦 = 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
38	37	adantr 480	. . . . . . . . . . . . . . . 16 ⊢ ((𝑥 ∈ On ∧ (𝑦 ∈ 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥))) → (𝑦 = 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
39	34, 38	jaod 859	. . . . . . . . . . . . . . 15 ⊢ ((𝑥 ∈ On ∧ (𝑦 ∈ 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥))) → ((𝑦 ∈ 𝑥 ∨ 𝑦 = 𝑥) → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
40	8, 39	biimtrid 242	. . . . . . . . . . . . . 14 ⊢ ((𝑥 ∈ On ∧ (𝑦 ∈ 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥))) → (𝑦 ∈ suc 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
41	40	ex 412	. . . . . . . . . . . . 13 ⊢ (𝑥 ∈ On → ((𝑦 ∈ 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)) → (𝑦 ∈ suc 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥))))
42	41	ralimdv2 3141	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ On → (∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) → ∀𝑦 ∈ suc 𝑥(rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
43		df-sbc 3737	. . . . . . . . . . . . 13 ⊢ ([suc 𝑥 / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) ↔ suc 𝑥 ∈ {𝑥 ∣ ∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)})
44		vex 3440	. . . . . . . . . . . . . . 15 ⊢ 𝑥 ∈ V
45	44	sucex 7739	. . . . . . . . . . . . . 14 ⊢ suc 𝑥 ∈ V
46		fveq2 6822	. . . . . . . . . . . . . . . 16 ⊢ (𝑧 = suc 𝑥 → (rec(𝐹, 𝐴)‘𝑧) = (rec(𝐹, 𝐴)‘suc 𝑥))
47	46	sseq2d 3962	. . . . . . . . . . . . . . 15 ⊢ (𝑧 = suc 𝑥 → ((rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧) ↔ (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
48	47	raleqbi1dv 3304	. . . . . . . . . . . . . 14 ⊢ (𝑧 = suc 𝑥 → (∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧) ↔ ∀𝑦 ∈ suc 𝑥(rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
49		fveq2 6822	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 = 𝑧 → (rec(𝐹, 𝐴)‘𝑥) = (rec(𝐹, 𝐴)‘𝑧))
50	49	sseq2d 3962	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑧 → ((rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) ↔ (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧)))
51	50	raleqbi1dv 3304	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑧 → (∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) ↔ ∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧)))
52	51	cbvabv 2801	. . . . . . . . . . . . . 14 ⊢ {𝑥 ∣ ∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)} = {𝑧 ∣ ∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧)}
53	45, 48, 52	elab2 3633	. . . . . . . . . . . . 13 ⊢ (suc 𝑥 ∈ {𝑥 ∣ ∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)} ↔ ∀𝑦 ∈ suc 𝑥(rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥))
54	43, 53	bitri 275	. . . . . . . . . . . 12 ⊢ ([suc 𝑥 / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) ↔ ∀𝑦 ∈ suc 𝑥(rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥))
55	42, 54	imbitrrdi 252	. . . . . . . . . . 11 ⊢ (𝑥 ∈ On → (∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) → [suc 𝑥 / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)))
56		ssiun2 4994	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ 𝑧 → (rec(𝐹, 𝐴)‘𝑦) ⊆ ∪ 𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦))
57	56	adantl 481	. . . . . . . . . . . . . . 15 ⊢ ((Lim 𝑧 ∧ 𝑦 ∈ 𝑧) → (rec(𝐹, 𝐴)‘𝑦) ⊆ ∪ 𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦))
58		vex 3440	. . . . . . . . . . . . . . . . 17 ⊢ 𝑧 ∈ V
59		rdglim2a 8352	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑧 ∈ V ∧ Lim 𝑧) → (rec(𝐹, 𝐴)‘𝑧) = ∪ 𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦))
60	58, 59	mpan 690	. . . . . . . . . . . . . . . 16 ⊢ (Lim 𝑧 → (rec(𝐹, 𝐴)‘𝑧) = ∪ 𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦))
61	60	adantr 480	. . . . . . . . . . . . . . 15 ⊢ ((Lim 𝑧 ∧ 𝑦 ∈ 𝑧) → (rec(𝐹, 𝐴)‘𝑧) = ∪ 𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦))
62	57, 61	sseqtrrd 3967	. . . . . . . . . . . . . 14 ⊢ ((Lim 𝑧 ∧ 𝑦 ∈ 𝑧) → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧))
63	62	ralrimiva 3124	. . . . . . . . . . . . 13 ⊢ (Lim 𝑧 → ∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧))
64		df-sbc 3737	. . . . . . . . . . . . . . 15 ⊢ ([𝑧 / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) ↔ 𝑧 ∈ {𝑥 ∣ ∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)})
65	52	eleq2i 2823	. . . . . . . . . . . . . . 15 ⊢ (𝑧 ∈ {𝑥 ∣ ∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)} ↔ 𝑧 ∈ {𝑧 ∣ ∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧)})
66	64, 65	bitri 275	. . . . . . . . . . . . . 14 ⊢ ([𝑧 / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) ↔ 𝑧 ∈ {𝑧 ∣ ∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧)})
67		abid 2713	. . . . . . . . . . . . . 14 ⊢ (𝑧 ∈ {𝑧 ∣ ∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧)} ↔ ∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧))
68	66, 67	bitri 275	. . . . . . . . . . . . 13 ⊢ ([𝑧 / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) ↔ ∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧))
69	63, 68	sylibr 234	. . . . . . . . . . . 12 ⊢ (Lim 𝑧 → [𝑧 / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥))
70	69	a1d 25	. . . . . . . . . . 11 ⊢ (Lim 𝑧 → (∀𝑥 ∈ 𝑧 ∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) → [𝑧 / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)))
71	6, 55, 70	tfindes 7793	. . . . . . . . . 10 ⊢ (𝑥 ∈ On → ∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥))
72		rsp 3220	. . . . . . . . . 10 ⊢ (∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) → (𝑦 ∈ 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)))
73	71, 72	syl 17	. . . . . . . . 9 ⊢ (𝑥 ∈ On → (𝑦 ∈ 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)))
74		eleq1 2819	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑋 → (𝑥 ∈ On ↔ 𝑋 ∈ On))
75	74	adantl 481	. . . . . . . . . 10 ⊢ ((𝑦 = 𝑌 ∧ 𝑥 = 𝑋) → (𝑥 ∈ On ↔ 𝑋 ∈ On))
76		eleq12 2821	. . . . . . . . . . 11 ⊢ ((𝑦 = 𝑌 ∧ 𝑥 = 𝑋) → (𝑦 ∈ 𝑥 ↔ 𝑌 ∈ 𝑋))
77		fveq2 6822	. . . . . . . . . . . . 13 ⊢ (𝑦 = 𝑌 → (rec(𝐹, 𝐴)‘𝑦) = (rec(𝐹, 𝐴)‘𝑌))
78	77	adantr 480	. . . . . . . . . . . 12 ⊢ ((𝑦 = 𝑌 ∧ 𝑥 = 𝑋) → (rec(𝐹, 𝐴)‘𝑦) = (rec(𝐹, 𝐴)‘𝑌))
79		fveq2 6822	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑋 → (rec(𝐹, 𝐴)‘𝑥) = (rec(𝐹, 𝐴)‘𝑋))
80	79	adantl 481	. . . . . . . . . . . 12 ⊢ ((𝑦 = 𝑌 ∧ 𝑥 = 𝑋) → (rec(𝐹, 𝐴)‘𝑥) = (rec(𝐹, 𝐴)‘𝑋))
81	78, 80	sseq12d 3963	. . . . . . . . . . 11 ⊢ ((𝑦 = 𝑌 ∧ 𝑥 = 𝑋) → ((rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) ↔ (rec(𝐹, 𝐴)‘𝑌) ⊆ (rec(𝐹, 𝐴)‘𝑋)))
82	76, 81	imbi12d 344	. . . . . . . . . 10 ⊢ ((𝑦 = 𝑌 ∧ 𝑥 = 𝑋) → ((𝑦 ∈ 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)) ↔ (𝑌 ∈ 𝑋 → (rec(𝐹, 𝐴)‘𝑌) ⊆ (rec(𝐹, 𝐴)‘𝑋))))
83	75, 82	imbi12d 344	. . . . . . . . 9 ⊢ ((𝑦 = 𝑌 ∧ 𝑥 = 𝑋) → ((𝑥 ∈ On → (𝑦 ∈ 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥))) ↔ (𝑋 ∈ On → (𝑌 ∈ 𝑋 → (rec(𝐹, 𝐴)‘𝑌) ⊆ (rec(𝐹, 𝐴)‘𝑋)))))
84	73, 83	mpbii 233	. . . . . . . 8 ⊢ ((𝑦 = 𝑌 ∧ 𝑥 = 𝑋) → (𝑋 ∈ On → (𝑌 ∈ 𝑋 → (rec(𝐹, 𝐴)‘𝑌) ⊆ (rec(𝐹, 𝐴)‘𝑋))))
85	84	ex 412	. . . . . . 7 ⊢ (𝑦 = 𝑌 → (𝑥 = 𝑋 → (𝑋 ∈ On → (𝑌 ∈ 𝑋 → (rec(𝐹, 𝐴)‘𝑌) ⊆ (rec(𝐹, 𝐴)‘𝑋)))))
86	85	vtocleg 3506	. . . . . 6 ⊢ (𝑌 ∈ 𝑋 → (𝑥 = 𝑋 → (𝑋 ∈ On → (𝑌 ∈ 𝑋 → (rec(𝐹, 𝐴)‘𝑌) ⊆ (rec(𝐹, 𝐴)‘𝑋)))))
87	86	com12 32	. . . . 5 ⊢ (𝑥 = 𝑋 → (𝑌 ∈ 𝑋 → (𝑋 ∈ On → (𝑌 ∈ 𝑋 → (rec(𝐹, 𝐴)‘𝑌) ⊆ (rec(𝐹, 𝐴)‘𝑋)))))
88	87	vtocleg 3506	. . . 4 ⊢ (𝑋 ∈ On → (𝑌 ∈ 𝑋 → (𝑋 ∈ On → (𝑌 ∈ 𝑋 → (rec(𝐹, 𝐴)‘𝑌) ⊆ (rec(𝐹, 𝐴)‘𝑋)))))
89	88	pm2.43b 55	. . 3 ⊢ (𝑌 ∈ 𝑋 → (𝑋 ∈ On → (𝑌 ∈ 𝑋 → (rec(𝐹, 𝐴)‘𝑌) ⊆ (rec(𝐹, 𝐴)‘𝑋))))
90	89	pm2.43b 55	. 2 ⊢ (𝑋 ∈ On → (𝑌 ∈ 𝑋 → (rec(𝐹, 𝐴)‘𝑌) ⊆ (rec(𝐹, 𝐴)‘𝑋)))
91	90	imp 406	1 ⊢ ((𝑋 ∈ On ∧ 𝑌 ∈ 𝑋) → (rec(𝐹, 𝐴)‘𝑌) ⊆ (rec(𝐹, 𝐴)‘𝑋))

Syntax hints:   → wi 4   ↔ wb 206   ∧ wa 395   ∨ wo 847   = wceq 1541   ∈ wcel 2111  {cab 2709  ∀wral 3047  Vcvv 3436  [wsbc 3736  ⦋csb 3845   ∪ cun 3895   ⊆ wss 3897  ∅c0 4280  ∪ ciun 4939   ↦ cmpt 5170  Oncon0 6306  Lim wlim 6307  suc csuc 6308  ‘cfv 6481  reccrdg 8328

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2113  ax-9 2121  ax-10 2144  ax-11 2160  ax-12 2180  ax-ext 2703  ax-rep 5215  ax-sep 5232  ax-nul 5242  ax-pr 5368  ax-un 7668

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2535  df-eu 2564  df-clab 2710  df-cleq 2723  df-clel 2806  df-nfc 2881  df-ne 2929  df-ral 3048  df-rex 3057  df-reu 3347  df-rab 3396  df-v 3438  df-sbc 3737  df-csb 3846  df-dif 3900  df-un 3902  df-in 3904  df-ss 3914  df-pss 3917  df-nul 4281  df-if 4473  df-pw 4549  df-sn 4574  df-pr 4576  df-op 4580  df-uni 4857  df-iun 4941  df-br 5090  df-opab 5152  df-mpt 5171  df-tr 5197  df-id 5509  df-eprel 5514  df-po 5522  df-so 5523  df-fr 5567  df-we 5569  df-xp 5620  df-rel 5621  df-cnv 5622  df-co 5623  df-dm 5624  df-rn 5625  df-res 5626  df-ima 5627  df-pred 6248  df-ord 6309  df-on 6310  df-lim 6311  df-suc 6312  df-iota 6437  df-fun 6483  df-fn 6484  df-f 6485  df-f1 6486  df-fo 6487  df-f1o 6488  df-fv 6489  df-ov 7349  df-2nd 7922  df-frecs 8211  df-wrecs 8242  df-recs 8291  df-rdg 8329

This theorem is referenced by: (None)