Theorem rdgssun 37705

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 3749	. . . . . . . . . . . 12 ⊢ Ⅎ𝑥[∅ / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)
2		0ex 5242	. . . . . . . . . . . 12 ⊢ ∅ ∈ V
3		rzal 4435	. . . . . . . . . . . . 13 ⊢ (𝑥 = ∅ → ∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥))
4		sbceq1a 3740	. . . . . . . . . . . . 13 ⊢ (𝑥 = ∅ → (∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) ↔ [∅ / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)))
5	3, 4	mpbid 232	. . . . . . . . . . . 12 ⊢ (𝑥 = ∅ → [∅ / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥))
6	1, 2, 5	vtoclef 3509	. . . . . . . . . . 11 ⊢ [∅ / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)
7		vex 3434	. . . . . . . . . . . . . . . 16 ⊢ 𝑦 ∈ V
8	7	elsuc 6387	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ suc 𝑥 ↔ (𝑦 ∈ 𝑥 ∨ 𝑦 = 𝑥))
9		ssun1 4119	. . . . . . . . . . . . . . . . . . . 20 ⊢ (rec(𝐹, 𝐴)‘𝑥) ⊆ ((rec(𝐹, 𝐴)‘𝑥) ∪ ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵)
10		fvex 6845	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (rec(𝐹, 𝐴)‘𝑥) ∈ V
11		rdgssun.2	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ 𝐵 ∈ V
12	11	csbex 5246	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵 ∈ V
13	10, 12	unex 7689	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((rec(𝐹, 𝐴)‘𝑥) ∪ ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵) ∈ V
14		nfcv 2899	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ Ⅎ𝑤𝐴
15		nfcv 2899	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ Ⅎ𝑤𝑥
16		rdgssun.1	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ 𝐹 = (𝑤 ∈ V ↦ (𝑤 ∪ 𝐵))
17		nfmpt1 5185	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ Ⅎ𝑤(𝑤 ∈ V ↦ (𝑤 ∪ 𝐵))
18	16, 17	nfcxfr 2897	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ Ⅎ𝑤𝐹
19	18, 14	nfrdg 8344	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ Ⅎ𝑤rec(𝐹, 𝐴)
20	19, 15	nffv 6842	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ Ⅎ𝑤(rec(𝐹, 𝐴)‘𝑥)
21	20	nfcsb1 3861	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ Ⅎ𝑤⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵
22	20, 21	nfun 4111	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ Ⅎ𝑤((rec(𝐹, 𝐴)‘𝑥) ∪ ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵)
23		rdgeq1 8341	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝐹 = (𝑤 ∈ V ↦ (𝑤 ∪ 𝐵)) → rec(𝐹, 𝐴) = rec((𝑤 ∈ V ↦ (𝑤 ∪ 𝐵)), 𝐴))
24	16, 23	ax-mp 5	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ rec(𝐹, 𝐴) = rec((𝑤 ∈ V ↦ (𝑤 ∪ 𝐵)), 𝐴)
25		id 22	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑤 = (rec(𝐹, 𝐴)‘𝑥) → 𝑤 = (rec(𝐹, 𝐴)‘𝑥))
26		csbeq1a 3852	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑤 = (rec(𝐹, 𝐴)‘𝑥) → 𝐵 = ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵)
27	25, 26	uneq12d 4110	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑤 = (rec(𝐹, 𝐴)‘𝑥) → (𝑤 ∪ 𝐵) = ((rec(𝐹, 𝐴)‘𝑥) ∪ ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵))
28	14, 15, 22, 24, 27	rdgsucmptf 8358	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑥 ∈ On ∧ ((rec(𝐹, 𝐴)‘𝑥) ∪ ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵) ∈ V) → (rec(𝐹, 𝐴)‘suc 𝑥) = ((rec(𝐹, 𝐴)‘𝑥) ∪ ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵))
29	13, 28	mpan2 692	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 ∈ On → (rec(𝐹, 𝐴)‘suc 𝑥) = ((rec(𝐹, 𝐴)‘𝑥) ∪ ⦋(rec(𝐹, 𝐴)‘𝑥) / 𝑤⦌𝐵))
30	9, 29	sseqtrrid 3966	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 ∈ On → (rec(𝐹, 𝐴)‘𝑥) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥))
31		sstr2 3929	. . . . . . . . . . . . . . . . . . 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 6832	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 = 𝑥 → (rec(𝐹, 𝐴)‘𝑦) = (rec(𝐹, 𝐴)‘𝑥))
36	35	sseq1d 3954	. . . . . . . . . . . . . . . . . 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 860	. . . . . . . . . . . . . . 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 3147	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ On → (∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) → ∀𝑦 ∈ suc 𝑥(rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
43		df-sbc 3730	. . . . . . . . . . . . 13 ⊢ ([suc 𝑥 / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) ↔ suc 𝑥 ∈ {𝑥 ∣ ∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)})
44		vex 3434	. . . . . . . . . . . . . . 15 ⊢ 𝑥 ∈ V
45	44	sucex 7751	. . . . . . . . . . . . . 14 ⊢ suc 𝑥 ∈ V
46		fveq2 6832	. . . . . . . . . . . . . . . 16 ⊢ (𝑧 = suc 𝑥 → (rec(𝐹, 𝐴)‘𝑧) = (rec(𝐹, 𝐴)‘suc 𝑥))
47	46	sseq2d 3955	. . . . . . . . . . . . . . 15 ⊢ (𝑧 = suc 𝑥 → ((rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧) ↔ (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
48	47	raleqbi1dv 3306	. . . . . . . . . . . . . 14 ⊢ (𝑧 = suc 𝑥 → (∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧) ↔ ∀𝑦 ∈ suc 𝑥(rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘suc 𝑥)))
49		fveq2 6832	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 = 𝑧 → (rec(𝐹, 𝐴)‘𝑥) = (rec(𝐹, 𝐴)‘𝑧))
50	49	sseq2d 3955	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑧 → ((rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) ↔ (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧)))
51	50	raleqbi1dv 3306	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑧 → (∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) ↔ ∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧)))
52	51	cbvabv 2807	. . . . . . . . . . . . . 14 ⊢ {𝑥 ∣ ∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)} = {𝑧 ∣ ∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧)}
53	45, 48, 52	elab2 3626	. . . . . . . . . . . . 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 4991	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ 𝑧 → (rec(𝐹, 𝐴)‘𝑦) ⊆ ∪ 𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦))
57	56	adantl 481	. . . . . . . . . . . . . . 15 ⊢ ((Lim 𝑧 ∧ 𝑦 ∈ 𝑧) → (rec(𝐹, 𝐴)‘𝑦) ⊆ ∪ 𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦))
58		vex 3434	. . . . . . . . . . . . . . . . 17 ⊢ 𝑧 ∈ V
59		rdglim2a 8363	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑧 ∈ V ∧ Lim 𝑧) → (rec(𝐹, 𝐴)‘𝑧) = ∪ 𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦))
60	58, 59	mpan 691	. . . . . . . . . . . . . . . 16 ⊢ (Lim 𝑧 → (rec(𝐹, 𝐴)‘𝑧) = ∪ 𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦))
61	60	adantr 480	. . . . . . . . . . . . . . 15 ⊢ ((Lim 𝑧 ∧ 𝑦 ∈ 𝑧) → (rec(𝐹, 𝐴)‘𝑧) = ∪ 𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦))
62	57, 61	sseqtrrd 3960	. . . . . . . . . . . . . 14 ⊢ ((Lim 𝑧 ∧ 𝑦 ∈ 𝑧) → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧))
63	62	ralrimiva 3130	. . . . . . . . . . . . 13 ⊢ (Lim 𝑧 → ∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧))
64		df-sbc 3730	. . . . . . . . . . . . . . 15 ⊢ ([𝑧 / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) ↔ 𝑧 ∈ {𝑥 ∣ ∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)})
65	52	eleq2i 2829	. . . . . . . . . . . . . . 15 ⊢ (𝑧 ∈ {𝑥 ∣ ∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)} ↔ 𝑧 ∈ {𝑧 ∣ ∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧)})
66	64, 65	bitri 275	. . . . . . . . . . . . . 14 ⊢ ([𝑧 / 𝑥]∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) ↔ 𝑧 ∈ {𝑧 ∣ ∀𝑦 ∈ 𝑧 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑧)})
67		abid 2719	. . . . . . . . . . . . . 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 7805	. . . . . . . . . 10 ⊢ (𝑥 ∈ On → ∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥))
72		rsp 3226	. . . . . . . . . 10 ⊢ (∀𝑦 ∈ 𝑥 (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥) → (𝑦 ∈ 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)))
73	71, 72	syl 17	. . . . . . . . 9 ⊢ (𝑥 ∈ On → (𝑦 ∈ 𝑥 → (rec(𝐹, 𝐴)‘𝑦) ⊆ (rec(𝐹, 𝐴)‘𝑥)))
74		eleq1 2825	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑋 → (𝑥 ∈ On ↔ 𝑋 ∈ On))
75	74	adantl 481	. . . . . . . . . 10 ⊢ ((𝑦 = 𝑌 ∧ 𝑥 = 𝑋) → (𝑥 ∈ On ↔ 𝑋 ∈ On))
76		eleq12 2827	. . . . . . . . . . 11 ⊢ ((𝑦 = 𝑌 ∧ 𝑥 = 𝑋) → (𝑦 ∈ 𝑥 ↔ 𝑌 ∈ 𝑋))
77		fveq2 6832	. . . . . . . . . . . . 13 ⊢ (𝑦 = 𝑌 → (rec(𝐹, 𝐴)‘𝑦) = (rec(𝐹, 𝐴)‘𝑌))
78	77	adantr 480	. . . . . . . . . . . 12 ⊢ ((𝑦 = 𝑌 ∧ 𝑥 = 𝑋) → (rec(𝐹, 𝐴)‘𝑦) = (rec(𝐹, 𝐴)‘𝑌))
79		fveq2 6832	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑋 → (rec(𝐹, 𝐴)‘𝑥) = (rec(𝐹, 𝐴)‘𝑋))
80	79	adantl 481	. . . . . . . . . . . 12 ⊢ ((𝑦 = 𝑌 ∧ 𝑥 = 𝑋) → (rec(𝐹, 𝐴)‘𝑥) = (rec(𝐹, 𝐴)‘𝑋))
81	78, 80	sseq12d 3956	. . . . . . . . . . 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 3499	. . . . . 6 ⊢ (𝑌 ∈ 𝑋 → (𝑥 = 𝑋 → (𝑋 ∈ On → (𝑌 ∈ 𝑋 → (rec(𝐹, 𝐴)‘𝑌) ⊆ (rec(𝐹, 𝐴)‘𝑋)))))
87	86	com12 32	. . . . 5 ⊢ (𝑥 = 𝑋 → (𝑌 ∈ 𝑋 → (𝑋 ∈ On → (𝑌 ∈ 𝑋 → (rec(𝐹, 𝐴)‘𝑌) ⊆ (rec(𝐹, 𝐴)‘𝑋)))))
88	87	vtocleg 3499	. . . 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 848   = wceq 1542   ∈ wcel 2114  {cab 2715  ∀wral 3052  Vcvv 3430  [wsbc 3729  ⦋csb 3838   ∪ cun 3888   ⊆ wss 3890  ∅c0 4274  ∪ ciun 4934   ↦ cmpt 5167  Oncon0 6315  Lim wlim 6316  suc csuc 6317  ‘cfv 6490  reccrdg 8339

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-rep 5212  ax-sep 5231  ax-nul 5241  ax-pr 5368  ax-un 7680

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-ral 3053  df-rex 3063  df-reu 3344  df-rab 3391  df-v 3432  df-sbc 3730  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4275  df-if 4468  df-pw 4544  df-sn 4569  df-pr 4571  df-op 4575  df-uni 4852  df-iun 4936  df-br 5087  df-opab 5149  df-mpt 5168  df-tr 5194  df-id 5517  df-eprel 5522  df-po 5530  df-so 5531  df-fr 5575  df-we 5577  df-xp 5628  df-rel 5629  df-cnv 5630  df-co 5631  df-dm 5632  df-rn 5633  df-res 5634  df-ima 5635  df-pred 6257  df-ord 6318  df-on 6319  df-lim 6320  df-suc 6321  df-iota 6446  df-fun 6492  df-fn 6493  df-f 6494  df-f1 6495  df-fo 6496  df-f1o 6497  df-fv 6498  df-ov 7361  df-2nd 7934  df-frecs 8222  df-wrecs 8253  df-recs 8302  df-rdg 8340

This theorem is referenced by: (None)