msubco - Mathbox for Mario Carneiro

	Mathbox for Mario Carneiro		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > msubco		Structured version Visualization version GIF version

Theorem msubco 35536

Description: The composition of two substitutions is a substitution. (Contributed by Mario Carneiro, 18-Jul-2016.)

**Hypothesis**
Ref	Expression
msubco.s	⊢ 𝑆 = (mSubst‘𝑇)

**Assertion**
Ref	Expression
msubco	⊢ ((𝐹 ∈ ran 𝑆 ∧ 𝐺 ∈ ran 𝑆) → (𝐹 ∘ 𝐺) ∈ ran 𝑆)

Proof of Theorem msubco Dummy variables 𝑓 𝑔 ℎ 𝑥 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		eqid 2737	. . . . 5 ⊢ (mEx‘𝑇) = (mEx‘𝑇)
2		eqid 2737	. . . . 5 ⊢ (mRSubst‘𝑇) = (mRSubst‘𝑇)
3		msubco.s	. . . . 5 ⊢ 𝑆 = (mSubst‘𝑇)
4	1, 2, 3	elmsubrn 35533	. . . 4 ⊢ ran 𝑆 = ran (𝑓 ∈ ran (mRSubst‘𝑇) ↦ (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩))
5	4	eleq2i 2833	. . 3 ⊢ (𝐹 ∈ ran 𝑆 ↔ 𝐹 ∈ ran (𝑓 ∈ ran (mRSubst‘𝑇) ↦ (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩)))
6		eqid 2737	. . . 4 ⊢ (𝑓 ∈ ran (mRSubst‘𝑇) ↦ (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩)) = (𝑓 ∈ ran (mRSubst‘𝑇) ↦ (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩))
7		fvex 6919	. . . . 5 ⊢ (mEx‘𝑇) ∈ V
8	7	mptex 7243	. . . 4 ⊢ (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∈ V
9	6, 8	elrnmpti 5973	. . 3 ⊢ (𝐹 ∈ ran (𝑓 ∈ ran (mRSubst‘𝑇) ↦ (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩)) ↔ ∃𝑓 ∈ ran (mRSubst‘𝑇)𝐹 = (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩))
10	5, 9	bitri 275	. 2 ⊢ (𝐹 ∈ ran 𝑆 ↔ ∃𝑓 ∈ ran (mRSubst‘𝑇)𝐹 = (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩))
11	1, 2, 3	elmsubrn 35533	. . . 4 ⊢ ran 𝑆 = ran (𝑔 ∈ ran (mRSubst‘𝑇) ↦ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩))
12	11	eleq2i 2833	. . 3 ⊢ (𝐺 ∈ ran 𝑆 ↔ 𝐺 ∈ ran (𝑔 ∈ ran (mRSubst‘𝑇) ↦ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)))
13		eqid 2737	. . . 4 ⊢ (𝑔 ∈ ran (mRSubst‘𝑇) ↦ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)) = (𝑔 ∈ ran (mRSubst‘𝑇) ↦ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩))
14	7	mptex 7243	. . . 4 ⊢ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩) ∈ V
15	13, 14	elrnmpti 5973	. . 3 ⊢ (𝐺 ∈ ran (𝑔 ∈ ran (mRSubst‘𝑇) ↦ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)) ↔ ∃𝑔 ∈ ran (mRSubst‘𝑇)𝐺 = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩))
16	12, 15	bitri 275	. 2 ⊢ (𝐺 ∈ ran 𝑆 ↔ ∃𝑔 ∈ ran (mRSubst‘𝑇)𝐺 = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩))
17		reeanv 3229	. . 3 ⊢ (∃𝑓 ∈ ran (mRSubst‘𝑇)∃𝑔 ∈ ran (mRSubst‘𝑇)(𝐹 = (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∧ 𝐺 = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)) ↔ (∃𝑓 ∈ ran (mRSubst‘𝑇)𝐹 = (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∧ ∃𝑔 ∈ ran (mRSubst‘𝑇)𝐺 = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)))
18		simpr 484	. . . . . . . . . . . 12 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → 𝑦 ∈ (mEx‘𝑇))
19		eqid 2737	. . . . . . . . . . . . 13 ⊢ (mTC‘𝑇) = (mTC‘𝑇)
20		eqid 2737	. . . . . . . . . . . . 13 ⊢ (mREx‘𝑇) = (mREx‘𝑇)
21	19, 1, 20	mexval 35507	. . . . . . . . . . . 12 ⊢ (mEx‘𝑇) = ((mTC‘𝑇) × (mREx‘𝑇))
22	18, 21	eleqtrdi 2851	. . . . . . . . . . 11 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → 𝑦 ∈ ((mTC‘𝑇) × (mREx‘𝑇)))
23		xp1st 8046	. . . . . . . . . . 11 ⊢ (𝑦 ∈ ((mTC‘𝑇) × (mREx‘𝑇)) → (1^st ‘𝑦) ∈ (mTC‘𝑇))
24	22, 23	syl 17	. . . . . . . . . 10 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → (1^st ‘𝑦) ∈ (mTC‘𝑇))
25	2, 20	mrsubf 35522	. . . . . . . . . . . 12 ⊢ (𝑔 ∈ ran (mRSubst‘𝑇) → 𝑔:(mREx‘𝑇)⟶(mREx‘𝑇))
26	25	ad2antlr 727	. . . . . . . . . . 11 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → 𝑔:(mREx‘𝑇)⟶(mREx‘𝑇))
27		xp2nd 8047	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ ((mTC‘𝑇) × (mREx‘𝑇)) → (2^nd ‘𝑦) ∈ (mREx‘𝑇))
28	22, 27	syl 17	. . . . . . . . . . 11 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → (2^nd ‘𝑦) ∈ (mREx‘𝑇))
29	26, 28	ffvelcdmd 7105	. . . . . . . . . 10 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → (𝑔‘(2^nd ‘𝑦)) ∈ (mREx‘𝑇))
30		opelxpi 5722	. . . . . . . . . 10 ⊢ (((1^st ‘𝑦) ∈ (mTC‘𝑇) ∧ (𝑔‘(2^nd ‘𝑦)) ∈ (mREx‘𝑇)) → ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩ ∈ ((mTC‘𝑇) × (mREx‘𝑇)))
31	24, 29, 30	syl2anc 584	. . . . . . . . 9 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩ ∈ ((mTC‘𝑇) × (mREx‘𝑇)))
32	31, 21	eleqtrrdi 2852	. . . . . . . 8 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩ ∈ (mEx‘𝑇))
33		eqidd 2738	. . . . . . . 8 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩) = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩))
34		eqidd 2738	. . . . . . . 8 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) = (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩))
35		fvex 6919	. . . . . . . . . 10 ⊢ (1^st ‘𝑦) ∈ V
36		fvex 6919	. . . . . . . . . 10 ⊢ (𝑔‘(2^nd ‘𝑦)) ∈ V
37	35, 36	op1std 8024	. . . . . . . . 9 ⊢ (𝑥 = ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩ → (1^st ‘𝑥) = (1^st ‘𝑦))
38	35, 36	op2ndd 8025	. . . . . . . . . 10 ⊢ (𝑥 = ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩ → (2^nd ‘𝑥) = (𝑔‘(2^nd ‘𝑦)))
39	38	fveq2d 6910	. . . . . . . . 9 ⊢ (𝑥 = ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩ → (𝑓‘(2^nd ‘𝑥)) = (𝑓‘(𝑔‘(2^nd ‘𝑦))))
40	37, 39	opeq12d 4881	. . . . . . . 8 ⊢ (𝑥 = ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩ → ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩ = ⟨(1^st ‘𝑦), (𝑓‘(𝑔‘(2^nd ‘𝑦)))⟩)
41	32, 33, 34, 40	fmptco 7149	. . . . . . 7 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → ((𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∘ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)) = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑓‘(𝑔‘(2^nd ‘𝑦)))⟩))
42		fvco3 7008	. . . . . . . . . 10 ⊢ ((𝑔:(mREx‘𝑇)⟶(mREx‘𝑇) ∧ (2^nd ‘𝑦) ∈ (mREx‘𝑇)) → ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦)) = (𝑓‘(𝑔‘(2^nd ‘𝑦))))
43	26, 28, 42	syl2anc 584	. . . . . . . . 9 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦)) = (𝑓‘(𝑔‘(2^nd ‘𝑦))))
44	43	opeq2d 4880	. . . . . . . 8 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → ⟨(1^st ‘𝑦), ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦))⟩ = ⟨(1^st ‘𝑦), (𝑓‘(𝑔‘(2^nd ‘𝑦)))⟩)
45	44	mpteq2dva 5242	. . . . . . 7 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦))⟩) = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑓‘(𝑔‘(2^nd ‘𝑦)))⟩))
46	41, 45	eqtr4d 2780	. . . . . 6 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → ((𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∘ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)) = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦))⟩))
47	2	mrsubco 35526	. . . . . . . 8 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → (𝑓 ∘ 𝑔) ∈ ran (mRSubst‘𝑇))
48	7	mptex 7243	. . . . . . . 8 ⊢ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦))⟩) ∈ V
49		eqid 2737	. . . . . . . . 9 ⊢ (ℎ ∈ ran (mRSubst‘𝑇) ↦ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (ℎ‘(2^nd ‘𝑦))⟩)) = (ℎ ∈ ran (mRSubst‘𝑇) ↦ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (ℎ‘(2^nd ‘𝑦))⟩))
50		fveq1 6905	. . . . . . . . . . 11 ⊢ (ℎ = (𝑓 ∘ 𝑔) → (ℎ‘(2^nd ‘𝑦)) = ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦)))
51	50	opeq2d 4880	. . . . . . . . . 10 ⊢ (ℎ = (𝑓 ∘ 𝑔) → ⟨(1^st ‘𝑦), (ℎ‘(2^nd ‘𝑦))⟩ = ⟨(1^st ‘𝑦), ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦))⟩)
52	51	mpteq2dv 5244	. . . . . . . . 9 ⊢ (ℎ = (𝑓 ∘ 𝑔) → (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (ℎ‘(2^nd ‘𝑦))⟩) = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦))⟩))
53	49, 52	elrnmpt1s 5970	. . . . . . . 8 ⊢ (((𝑓 ∘ 𝑔) ∈ ran (mRSubst‘𝑇) ∧ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦))⟩) ∈ V) → (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦))⟩) ∈ ran (ℎ ∈ ran (mRSubst‘𝑇) ↦ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (ℎ‘(2^nd ‘𝑦))⟩)))
54	47, 48, 53	sylancl 586	. . . . . . 7 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦))⟩) ∈ ran (ℎ ∈ ran (mRSubst‘𝑇) ↦ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (ℎ‘(2^nd ‘𝑦))⟩)))
55	1, 2, 3	elmsubrn 35533	. . . . . . 7 ⊢ ran 𝑆 = ran (ℎ ∈ ran (mRSubst‘𝑇) ↦ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (ℎ‘(2^nd ‘𝑦))⟩))
56	54, 55	eleqtrrdi 2852	. . . . . 6 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦))⟩) ∈ ran 𝑆)
57	46, 56	eqeltrd 2841	. . . . 5 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → ((𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∘ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)) ∈ ran 𝑆)
58		coeq1 5868	. . . . . . 7 ⊢ (𝐹 = (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) → (𝐹 ∘ 𝐺) = ((𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∘ 𝐺))
59		coeq2 5869	. . . . . . 7 ⊢ (𝐺 = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩) → ((𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∘ 𝐺) = ((𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∘ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)))
60	58, 59	sylan9eq 2797	. . . . . 6 ⊢ ((𝐹 = (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∧ 𝐺 = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)) → (𝐹 ∘ 𝐺) = ((𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∘ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)))
61	60	eleq1d 2826	. . . . 5 ⊢ ((𝐹 = (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∧ 𝐺 = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)) → ((𝐹 ∘ 𝐺) ∈ ran 𝑆 ↔ ((𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∘ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)) ∈ ran 𝑆))
62	57, 61	syl5ibrcom 247	. . . 4 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → ((𝐹 = (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∧ 𝐺 = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)) → (𝐹 ∘ 𝐺) ∈ ran 𝑆))
63	62	rexlimivv 3201	. . 3 ⊢ (∃𝑓 ∈ ran (mRSubst‘𝑇)∃𝑔 ∈ ran (mRSubst‘𝑇)(𝐹 = (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∧ 𝐺 = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)) → (𝐹 ∘ 𝐺) ∈ ran 𝑆)
64	17, 63	sylbir 235	. 2 ⊢ ((∃𝑓 ∈ ran (mRSubst‘𝑇)𝐹 = (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∧ ∃𝑔 ∈ ran (mRSubst‘𝑇)𝐺 = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)) → (𝐹 ∘ 𝐺) ∈ ran 𝑆)
65	10, 16, 64	syl2anb 598	1 ⊢ ((𝐹 ∈ ran 𝑆 ∧ 𝐺 ∈ ran 𝑆) → (𝐹 ∘ 𝐺) ∈ ran 𝑆)

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 395 = wceq 1540 ∈ wcel 2108 ∃wrex 3070 Vcvv 3480 ⟨cop 4632 ↦ cmpt 5225 × cxp 5683 ran crn 5686 ∘ ccom 5689 ⟶wf 6557 ‘cfv 6561 1^st c1st 8012 2^nd c2nd 8013 mTCcmtc 35469 mRExcmrex 35471 mExcmex 35472 mRSubstcmrsub 35475 mSubstcmsub 35476

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1795 ax-4 1809 ax-5 1910 ax-6 1967 ax-7 2007 ax-8 2110 ax-9 2118 ax-10 2141 ax-11 2157 ax-12 2177 ax-ext 2708 ax-rep 5279 ax-sep 5296 ax-nul 5306 ax-pow 5365 ax-pr 5432 ax-un 7755 ax-cnex 11211 ax-resscn 11212 ax-1cn 11213 ax-icn 11214 ax-addcl 11215 ax-addrcl 11216 ax-mulcl 11217 ax-mulrcl 11218 ax-mulcom 11219 ax-addass 11220 ax-mulass 11221 ax-distr 11222 ax-i2m1 11223 ax-1ne0 11224 ax-1rid 11225 ax-rnegex 11226 ax-rrecex 11227 ax-cnre 11228 ax-pre-lttri 11229 ax-pre-lttrn 11230 ax-pre-ltadd 11231 ax-pre-mulgt0 11232

This theorem depends on definitions: df-bi 207 df-an 396 df-or 849 df-3or 1088 df-3an 1089 df-tru 1543 df-fal 1553 df-ex 1780 df-nf 1784 df-sb 2065 df-mo 2540 df-eu 2569 df-clab 2715 df-cleq 2729 df-clel 2816 df-nfc 2892 df-ne 2941 df-nel 3047 df-ral 3062 df-rex 3071 df-rmo 3380 df-reu 3381 df-rab 3437 df-v 3482 df-sbc 3789 df-csb 3900 df-dif 3954 df-un 3956 df-in 3958 df-ss 3968 df-pss 3971 df-nul 4334 df-if 4526 df-pw 4602 df-sn 4627 df-pr 4629 df-op 4633 df-uni 4908 df-int 4947 df-iun 4993 df-br 5144 df-opab 5206 df-mpt 5226 df-tr 5260 df-id 5578 df-eprel 5584 df-po 5592 df-so 5593 df-fr 5637 df-we 5639 df-xp 5691 df-rel 5692 df-cnv 5693 df-co 5694 df-dm 5695 df-rn 5696 df-res 5697 df-ima 5698 df-pred 6321 df-ord 6387 df-on 6388 df-lim 6389 df-suc 6390 df-iota 6514 df-fun 6563 df-fn 6564 df-f 6565 df-f1 6566 df-fo 6567 df-f1o 6568 df-fv 6569 df-riota 7388 df-ov 7434 df-oprab 7435 df-mpo 7436 df-om 7888 df-1st 8014 df-2nd 8015 df-frecs 8306 df-wrecs 8337 df-recs 8411 df-rdg 8450 df-1o 8506 df-er 8745 df-map 8868 df-pm 8869 df-en 8986 df-dom 8987 df-sdom 8988 df-fin 8989 df-card 9979 df-pnf 11297 df-mnf 11298 df-xr 11299 df-ltxr 11300 df-le 11301 df-sub 11494 df-neg 11495 df-nn 12267 df-2 12329 df-n0 12527 df-xnn0 12600 df-z 12614 df-uz 12879 df-fz 13548 df-fzo 13695 df-seq 14043 df-hash 14370 df-word 14553 df-lsw 14601 df-concat 14609 df-s1 14634 df-substr 14679 df-pfx 14709 df-struct 17184 df-sets 17201 df-slot 17219 df-ndx 17231 df-base 17248 df-ress 17275 df-plusg 17310 df-0g 17486 df-gsum 17487 df-mgm 18653 df-sgrp 18732 df-mnd 18748 df-mhm 18796 df-submnd 18797 df-frmd 18862 df-vrmd 18863 df-mrex 35491 df-mex 35492 df-mrsub 35495 df-msub 35496

This theorem is referenced by: mclsppslem 35588

W3C validator