Theorem rdgssun 36723

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 3797	. . . . . . . . . . . 12 ⊢ Ⅎ𝑥[∅ / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)
2		0ex 5307	. . . . . . . . . . . 12 ⊢ ∅ ∈ V
3		rzal 4508	. . . . . . . . . . . . 13 ⊢ (𝑥 = ∅ → ∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥))
4		sbceq1a 3788	. . . . . . . . . . . . 13 ⊢ (𝑥 = ∅ → (∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) ↔ [∅ / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)))
5	3, 4	mpbid 231	. . . . . . . . . . . 12 ⊢ (𝑥 = ∅ → [∅ / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥))
6	1, 2, 5	vtoclef 3550	. . . . . . . . . . 11 ⊢ [∅ / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)
7		vex 3477	. . . . . . . . . . . . . . . 16 ⊢ 𝑦 ∈ V
8	7	elsuc 6434	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ suc 𝑥 ↔ (𝑦 ∈ 𝑥 ∨ 𝑦 = 𝑥))
9		ssun1 4172	. . . . . . . . . . . . . . . . . . . 20 ⊢ (rec(𝐹, 𝐴)‘𝑥) ⊆ ((rec(𝐹, 𝐴)‘𝑥) ∪ ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵)
10		fvex 6904	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (rec(𝐹, 𝐴)‘𝑥) ∈ V
11		rdgssun.2	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ 𝐵 ∈ V
12	11	csbex 5311	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵 ∈ V
13	10, 12	unex 7737	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((rec(𝐹, 𝐴)‘𝑥) ∪ ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵) ∈ V
14		nfcv 2902	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ Ⅎ𝑤𝐴
15		nfcv 2902	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ Ⅎ𝑤𝑥
16		rdgssun.1	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ 𝐹 = (𝑤 ∈ V ↦ (𝑤 ∪ 𝐵))
17		nfmpt1 5256	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ Ⅎ𝑤(𝑤 ∈ V ↦ (𝑤 ∪ 𝐵))
18	16, 17	nfcxfr 2900	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ Ⅎ𝑤𝐹
19	18, 14	nfrdg 8420	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ Ⅎ𝑤rec(𝐹, 𝐴)
20	19, 15	nffv 6901	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ Ⅎ𝑤(rec(𝐹, 𝐴)‘𝑥)
21	20	nfcsb1 3917	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ Ⅎ𝑤⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵
22	20, 21	nfun 4165	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ Ⅎ𝑤((rec(𝐹, 𝐴)‘𝑥) ∪ ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵)
23		rdgeq1 8417	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝐹 = (𝑤 ∈ V ↦ (𝑤 ∪ 𝐵)) → rec(𝐹, 𝐴) = rec((𝑤 ∈ V ↦ (𝑤 ∪ 𝐵)), 𝐴))
24	16, 23	ax-mp 5	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ rec(𝐹, 𝐴) = rec((𝑤 ∈ V ↦ (𝑤 ∪ 𝐵)), 𝐴)
25		id 22	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑤 = (rec(𝐹, 𝐴)‘𝑥) → 𝑤 = (rec(𝐹, 𝐴)‘𝑥))
26		csbeq1a 3907	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑤 = (rec(𝐹, 𝐴)‘𝑥) → 𝐵 = ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵)
27	25, 26	uneq12d 4164	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑤 = (rec(𝐹, 𝐴)‘𝑥) → (𝑤 ∪ 𝐵) = ((rec(𝐹, 𝐴)‘𝑥) ∪ ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵))
28	14, 15, 22, 24, 27	rdgsucmptf 8434	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑥 ∈ On ∧ ((rec(𝐹, 𝐴)‘𝑥) ∪ ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵) ∈ V) → (rec(𝐹, 𝐴)‘suc 𝑥) = ((rec(𝐹, 𝐴)‘𝑥) ∪ ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵))
29	13, 28	mpan2 688	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 ∈ On → (rec(𝐹, 𝐴)‘suc 𝑥) = ((rec(𝐹, 𝐴)‘𝑥) ∪ ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵))
30	9, 29	sseqtrrid 4035	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 ∈ On → (rec(𝐹, 𝐴)‘𝑥) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥))
31		sstr2 3989	. . . . . . . . . . . . . . . . . . 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 6891	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 = 𝑥 → (rec(𝐹, 𝐴)‘𝑦) = (rec(𝐹, 𝐴)‘𝑥))
36	35	sseq1d 4013	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 = 𝑥 → ((rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥) ↔ (rec(𝐹, 𝐴)‘𝑥) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
37	30, 36	syl5ibrcom 246	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 ∈ On → (𝑦 = 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
38	37	adantr 480	. . . . . . . . . . . . . . . 16 ⊢ ((𝑥 ∈ On ∧ (𝑦 ∈ 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥))) → (𝑦 = 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
39	34, 38	jaod 856	. . . . . . . . . . . . . . 15 ⊢ ((𝑥 ∈ On ∧ (𝑦 ∈ 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥))) → ((𝑦 ∈ 𝑥 ∨ 𝑦 = 𝑥) → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
40	8, 39	biimtrid 241	. . . . . . . . . . . . . 14 ⊢ ((𝑥 ∈ On ∧ (𝑦 ∈ 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥))) → (𝑦 ∈ suc 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
41	40	ex 412	. . . . . . . . . . . . 13 ⊢ (𝑥 ∈ On → ((𝑦 ∈ 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)) → (𝑦 ∈ suc 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥))))
42	41	ralimdv2 3162	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ On → (∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) → ∀𝑦 ∈ suc 𝑥(rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
43		df-sbc 3778	. . . . . . . . . . . . 13 ⊢ ([suc 𝑥 / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) ↔ suc 𝑥 ∈ {𝑥 ∣ ∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)})
44		vex 3477	. . . . . . . . . . . . . . 15 ⊢ 𝑥 ∈ V
45	44	sucex 7798	. . . . . . . . . . . . . 14 ⊢ suc 𝑥 ∈ V
46		fveq2 6891	. . . . . . . . . . . . . . . 16 ⊢ (𝑧 = suc 𝑥 → (rec(𝐹, 𝐴)‘𝑧) = (rec(𝐹, 𝐴)‘suc 𝑥))
47	46	sseq2d 4014	. . . . . . . . . . . . . . 15 ⊢ (𝑧 = suc 𝑥 → ((rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧) ↔ (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
48	47	raleqbi1dv 3332	. . . . . . . . . . . . . 14 ⊢ (𝑧 = suc 𝑥 → (∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧) ↔ ∀𝑦 ∈ suc 𝑥(rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
49		fveq2 6891	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 = 𝑧 → (rec(𝐹, 𝐴)‘𝑥) = (rec(𝐹, 𝐴)‘𝑧))
50	49	sseq2d 4014	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑧 → ((rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) ↔ (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧)))
51	50	raleqbi1dv 3332	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑧 → (∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) ↔ ∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧)))
52	51	cbvabv 2804	. . . . . . . . . . . . . 14 ⊢ {𝑥 ∣ ∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)} = {𝑧 ∣ ∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧)}
53	45, 48, 52	elab2 3672	. . . . . . . . . . . . 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 251	. . . . . . . . . . 11 ⊢ (𝑥 ∈ On → (∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) → [suc 𝑥 / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)))
56		ssiun2 5050	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ 𝑧 → (rec(𝐹, 𝐴)‘𝑦) ⊆ ∪ 𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦))
57	56	adantl 481	. . . . . . . . . . . . . . 15 ⊢ ((Lim 𝑧 ∧ 𝑦 ∈ 𝑧) → (rec(𝐹, 𝐴)‘𝑦) ⊆ ∪ 𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦))
58		vex 3477	. . . . . . . . . . . . . . . . 17 ⊢ 𝑧 ∈ V
59		rdglim2a 8439	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑧 ∈ V ∧ Lim 𝑧) → (rec(𝐹, 𝐴)‘𝑧) = ∪ 𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦))
60	58, 59	mpan 687	. . . . . . . . . . . . . . . 16 ⊢ (Lim 𝑧 → (rec(𝐹, 𝐴)‘𝑧) = ∪ 𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦))
61	60	adantr 480	. . . . . . . . . . . . . . 15 ⊢ ((Lim 𝑧 ∧ 𝑦 ∈ 𝑧) → (rec(𝐹, 𝐴)‘𝑧) = ∪ 𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦))
62	57, 61	sseqtrrd 4023	. . . . . . . . . . . . . 14 ⊢ ((Lim 𝑧 ∧ 𝑦 ∈ 𝑧) → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧))
63	62	ralrimiva 3145	. . . . . . . . . . . . 13 ⊢ (Lim 𝑧 → ∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧))
64		df-sbc 3778	. . . . . . . . . . . . . . 15 ⊢ ([𝑧 / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) ↔ 𝑧 ∈ {𝑥 ∣ ∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)})
65	52	eleq2i 2824	. . . . . . . . . . . . . . 15 ⊢ (𝑧 ∈ {𝑥 ∣ ∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)} ↔ 𝑧 ∈ {𝑧 ∣ ∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧)})
66	64, 65	bitri 275	. . . . . . . . . . . . . 14 ⊢ ([𝑧 / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) ↔ 𝑧 ∈ {𝑧 ∣ ∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧)})
67		abid 2712	. . . . . . . . . . . . . 14 ⊢ (𝑧 ∈ {𝑧 ∣ ∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧)} ↔ ∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧))
68	66, 67	bitri 275	. . . . . . . . . . . . 13 ⊢ ([𝑧 / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) ↔ ∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧))
69	63, 68	sylibr 233	. . . . . . . . . . . 12 ⊢ (Lim 𝑧 → [𝑧 / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥))
70	69	a1d 25	. . . . . . . . . . 11 ⊢ (Lim 𝑧 → (∀𝑥 ∈ 𝑧 ∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) → [𝑧 / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)))
71	6, 55, 70	tfindes 7856	. . . . . . . . . 10 ⊢ (𝑥 ∈ On → ∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥))
72		rsp 3243	. . . . . . . . . 10 ⊢ (∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) → (𝑦 ∈ 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)))
73	71, 72	syl 17	. . . . . . . . 9 ⊢ (𝑥 ∈ On → (𝑦 ∈ 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)))
74		eleq1 2820	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑋 → (𝑥 ∈ On ↔ 𝑋 ∈ On))
75	74	adantl 481	. . . . . . . . . 10 ⊢ ((𝑦 = 𝑌 ∧ 𝑥 = 𝑋) → (𝑥 ∈ On ↔ 𝑋 ∈ On))
76		eleq12 2822	. . . . . . . . . . 11 ⊢ ((𝑦 = 𝑌 ∧ 𝑥 = 𝑋) → (𝑦 ∈ 𝑥 ↔ 𝑌 ∈ 𝑋))
77		fveq2 6891	. . . . . . . . . . . . 13 ⊢ (𝑦 = 𝑌 → (rec(𝐹, 𝐴)‘𝑦) = (rec(𝐹, 𝐴)‘𝑌))
78	77	adantr 480	. . . . . . . . . . . 12 ⊢ ((𝑦 = 𝑌 ∧ 𝑥 = 𝑋) → (rec(𝐹, 𝐴)‘𝑦) = (rec(𝐹, 𝐴)‘𝑌))
79		fveq2 6891	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑋 → (rec(𝐹, 𝐴)‘𝑥) = (rec(𝐹, 𝐴)‘𝑋))
80	79	adantl 481	. . . . . . . . . . . 12 ⊢ ((𝑦 = 𝑌 ∧ 𝑥 = 𝑋) → (rec(𝐹, 𝐴)‘𝑥) = (rec(𝐹, 𝐴)‘𝑋))
81	78, 80	sseq12d 4015	. . . . . . . . . . 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 232	. . . . . . . 8 ⊢ ((𝑦 = 𝑌 ∧ 𝑥 = 𝑋) → (𝑋 ∈ On → (𝑌 ∈ 𝑋 → (rec(𝐹, 𝐴)‘𝑌) ⊆ (rec(𝐹, 𝐴)‘𝑋))))
85	84	ex 412	. . . . . . 7 ⊢ (𝑦 = 𝑌 → (𝑥 = 𝑋 → (𝑋 ∈ On → (𝑌 ∈ 𝑋 → (rec(𝐹, 𝐴)‘𝑌) ⊆ (rec(𝐹, 𝐴)‘𝑋)))))
86	85	vtocleg 3541	. . . . . 6 ⊢ (𝑌 ∈ 𝑋 → (𝑥 = 𝑋 → (𝑋 ∈ On → (𝑌 ∈ 𝑋 → (rec(𝐹, 𝐴)‘𝑌) ⊆ (rec(𝐹, 𝐴)‘𝑋)))))
87	86	com12 32	. . . . 5 ⊢ (𝑥 = 𝑋 → (𝑌 ∈ 𝑋 → (𝑋 ∈ On → (𝑌 ∈ 𝑋 → (rec(𝐹, 𝐴)‘𝑌) ⊆ (rec(𝐹, 𝐴)‘𝑋)))))
88	87	vtocleg 3541	. . . 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 205   ∧ wa 395   ∨ wo 844   = wceq 1540   ∈ wcel 2105  {cab 2708  ∀wral 3060  Vcvv 3473  [wsbc 3777  ⦋csb 3893   ∪ cun 3946   ⊆ wss 3948  ∅c0 4322  ∪ ciun 4997   ↦ cmpt 5231  Oncon0 6364  Lim wlim 6365  suc csuc 6366  ‘cfv 6543  reccrdg 8415

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 1912  ax-6 1970  ax-7 2010  ax-8 2107  ax-9 2115  ax-10 2136  ax-11 2153  ax-12 2170  ax-ext 2702  ax-rep 5285  ax-sep 5299  ax-nul 5306  ax-pr 5427  ax-un 7729

This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1781  df-nf 1785  df-sb 2067  df-mo 2533  df-eu 2562  df-clab 2709  df-cleq 2723  df-clel 2809  df-nfc 2884  df-ne 2940  df-ral 3061  df-rex 3070  df-reu 3376  df-rab 3432  df-v 3475  df-sbc 3778  df-csb 3894  df-dif 3951  df-un 3953  df-in 3955  df-ss 3965  df-pss 3967  df-nul 4323  df-if 4529  df-pw 4604  df-sn 4629  df-pr 4631  df-op 4635  df-uni 4909  df-iun 4999  df-br 5149  df-opab 5211  df-mpt 5232  df-tr 5266  df-id 5574  df-eprel 5580  df-po 5588  df-so 5589  df-fr 5631  df-we 5633  df-xp 5682  df-rel 5683  df-cnv 5684  df-co 5685  df-dm 5686  df-rn 5687  df-res 5688  df-ima 5689  df-pred 6300  df-ord 6367  df-on 6368  df-lim 6369  df-suc 6370  df-iota 6495  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-fv 6551  df-ov 7415  df-2nd 7980  df-frecs 8272  df-wrecs 8303  df-recs 8377  df-rdg 8416

This theorem is referenced by: (None)