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 35747

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 35744	. . . 4 ⊢ ran 𝑆 = ran (𝑓 ∈ ran (mRSubst‘𝑇) ↦ (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩))
5	4	eleq2i 2829	. . 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 6855	. . . . 5 ⊢ (mEx‘𝑇) ∈ V
8	7	mptex 7179	. . . 4 ⊢ (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∈ V
9	6, 8	elrnmpti 5919	. . 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 35744	. . . 4 ⊢ ran 𝑆 = ran (𝑔 ∈ ran (mRSubst‘𝑇) ↦ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩))
12	11	eleq2i 2829	. . 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 7179	. . . 4 ⊢ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩) ∈ V
15	13, 14	elrnmpti 5919	. . 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 3210	. . 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 35718	. . . . . . . . . . . 12 ⊢ (mEx‘𝑇) = ((mTC‘𝑇) × (mREx‘𝑇))
22	18, 21	eleqtrdi 2847	. . . . . . . . . . 11 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → 𝑦 ∈ ((mTC‘𝑇) × (mREx‘𝑇)))
23		xp1st 7975	. . . . . . . . . . 11 ⊢ (𝑦 ∈ ((mTC‘𝑇) × (mREx‘𝑇)) → (1^st ‘𝑦) ∈ (mTC‘𝑇))
24	22, 23	syl 17	. . . . . . . . . 10 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → (1^st ‘𝑦) ∈ (mTC‘𝑇))
25	2, 20	mrsubf 35733	. . . . . . . . . . . 12 ⊢ (𝑔 ∈ ran (mRSubst‘𝑇) → 𝑔:(mREx‘𝑇)⟶(mREx‘𝑇))
26	25	ad2antlr 728	. . . . . . . . . . 11 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → 𝑔:(mREx‘𝑇)⟶(mREx‘𝑇))
27		xp2nd 7976	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ ((mTC‘𝑇) × (mREx‘𝑇)) → (2^nd ‘𝑦) ∈ (mREx‘𝑇))
28	22, 27	syl 17	. . . . . . . . . . 11 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → (2^nd ‘𝑦) ∈ (mREx‘𝑇))
29	26, 28	ffvelcdmd 7039	. . . . . . . . . 10 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → (𝑔‘(2^nd ‘𝑦)) ∈ (mREx‘𝑇))
30		opelxpi 5669	. . . . . . . . . 10 ⊢ (((1^st ‘𝑦) ∈ (mTC‘𝑇) ∧ (𝑔‘(2^nd ‘𝑦)) ∈ (mREx‘𝑇)) → ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩ ∈ ((mTC‘𝑇) × (mREx‘𝑇)))
31	24, 29, 30	syl2anc 585	. . . . . . . . 9 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩ ∈ ((mTC‘𝑇) × (mREx‘𝑇)))
32	31, 21	eleqtrrdi 2848	. . . . . . . 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 6855	. . . . . . . . . 10 ⊢ (1^st ‘𝑦) ∈ V
36		fvex 6855	. . . . . . . . . 10 ⊢ (𝑔‘(2^nd ‘𝑦)) ∈ V
37	35, 36	op1std 7953	. . . . . . . . 9 ⊢ (𝑥 = ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩ → (1^st ‘𝑥) = (1^st ‘𝑦))
38	35, 36	op2ndd 7954	. . . . . . . . . 10 ⊢ (𝑥 = ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩ → (2^nd ‘𝑥) = (𝑔‘(2^nd ‘𝑦)))
39	38	fveq2d 6846	. . . . . . . . 9 ⊢ (𝑥 = ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩ → (𝑓‘(2^nd ‘𝑥)) = (𝑓‘(𝑔‘(2^nd ‘𝑦))))
40	37, 39	opeq12d 4839	. . . . . . . 8 ⊢ (𝑥 = ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩ → ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩ = ⟨(1^st ‘𝑦), (𝑓‘(𝑔‘(2^nd ‘𝑦)))⟩)
41	32, 33, 34, 40	fmptco 7084	. . . . . . 7 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → ((𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∘ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)) = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑓‘(𝑔‘(2^nd ‘𝑦)))⟩))
42		fvco3 6941	. . . . . . . . . 10 ⊢ ((𝑔:(mREx‘𝑇)⟶(mREx‘𝑇) ∧ (2^nd ‘𝑦) ∈ (mREx‘𝑇)) → ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦)) = (𝑓‘(𝑔‘(2^nd ‘𝑦))))
43	26, 28, 42	syl2anc 585	. . . . . . . . 9 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦)) = (𝑓‘(𝑔‘(2^nd ‘𝑦))))
44	43	opeq2d 4838	. . . . . . . 8 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → ⟨(1^st ‘𝑦), ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦))⟩ = ⟨(1^st ‘𝑦), (𝑓‘(𝑔‘(2^nd ‘𝑦)))⟩)
45	44	mpteq2dva 5193	. . . . . . 7 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦))⟩) = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑓‘(𝑔‘(2^nd ‘𝑦)))⟩))
46	41, 45	eqtr4d 2775	. . . . . 6 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → ((𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∘ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)) = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦))⟩))
47	2	mrsubco 35737	. . . . . . . 8 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → (𝑓 ∘ 𝑔) ∈ ran (mRSubst‘𝑇))
48	7	mptex 7179	. . . . . . . 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 6841	. . . . . . . . . . 11 ⊢ (ℎ = (𝑓 ∘ 𝑔) → (ℎ‘(2^nd ‘𝑦)) = ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦)))
51	50	opeq2d 4838	. . . . . . . . . 10 ⊢ (ℎ = (𝑓 ∘ 𝑔) → ⟨(1^st ‘𝑦), (ℎ‘(2^nd ‘𝑦))⟩ = ⟨(1^st ‘𝑦), ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦))⟩)
52	51	mpteq2dv 5194	. . . . . . . . 9 ⊢ (ℎ = (𝑓 ∘ 𝑔) → (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (ℎ‘(2^nd ‘𝑦))⟩) = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦))⟩))
53	49, 52	elrnmpt1s 5916	. . . . . . . 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 587	. . . . . . 7 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦))⟩) ∈ ran (ℎ ∈ ran (mRSubst‘𝑇) ↦ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (ℎ‘(2^nd ‘𝑦))⟩)))
55	1, 2, 3	elmsubrn 35744	. . . . . . 7 ⊢ ran 𝑆 = ran (ℎ ∈ ran (mRSubst‘𝑇) ↦ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (ℎ‘(2^nd ‘𝑦))⟩))
56	54, 55	eleqtrrdi 2848	. . . . . 6 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦))⟩) ∈ ran 𝑆)
57	46, 56	eqeltrd 2837	. . . . 5 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → ((𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∘ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)) ∈ ran 𝑆)
58		coeq1 5814	. . . . . . 7 ⊢ (𝐹 = (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) → (𝐹 ∘ 𝐺) = ((𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∘ 𝐺))
59		coeq2 5815	. . . . . . 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 2792	. . . . . 6 ⊢ ((𝐹 = (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∧ 𝐺 = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)) → (𝐹 ∘ 𝐺) = ((𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∘ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)))
61	60	eleq1d 2822	. . . . 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 3180	. . 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 599	1 ⊢ ((𝐹 ∈ ran 𝑆 ∧ 𝐺 ∈ ran 𝑆) → (𝐹 ∘ 𝐺) ∈ ran 𝑆)

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 395 = wceq 1542 ∈ wcel 2114 ∃wrex 3062 Vcvv 3442 ⟨cop 4588 ↦ cmpt 5181 × cxp 5630 ran crn 5633 ∘ ccom 5636 ⟶wf 6496 ‘cfv 6500 1^st c1st 7941 2^nd c2nd 7942 mTCcmtc 35680 mRExcmrex 35682 mExcmex 35683 mRSubstcmrsub 35686 mSubstcmsub 35687

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 5226 ax-sep 5243 ax-nul 5253 ax-pow 5312 ax-pr 5379 ax-un 7690 ax-cnex 11094 ax-resscn 11095 ax-1cn 11096 ax-icn 11097 ax-addcl 11098 ax-addrcl 11099 ax-mulcl 11100 ax-mulrcl 11101 ax-mulcom 11102 ax-addass 11103 ax-mulass 11104 ax-distr 11105 ax-i2m1 11106 ax-1ne0 11107 ax-1rid 11108 ax-rnegex 11109 ax-rrecex 11110 ax-cnre 11111 ax-pre-lttri 11112 ax-pre-lttrn 11113 ax-pre-ltadd 11114 ax-pre-mulgt0 11115

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-nel 3038 df-ral 3053 df-rex 3063 df-rmo 3352 df-reu 3353 df-rab 3402 df-v 3444 df-sbc 3743 df-csb 3852 df-dif 3906 df-un 3908 df-in 3910 df-ss 3920 df-pss 3923 df-nul 4288 df-if 4482 df-pw 4558 df-sn 4583 df-pr 4585 df-op 4589 df-uni 4866 df-int 4905 df-iun 4950 df-br 5101 df-opab 5163 df-mpt 5182 df-tr 5208 df-id 5527 df-eprel 5532 df-po 5540 df-so 5541 df-fr 5585 df-we 5587 df-xp 5638 df-rel 5639 df-cnv 5640 df-co 5641 df-dm 5642 df-rn 5643 df-res 5644 df-ima 5645 df-pred 6267 df-ord 6328 df-on 6329 df-lim 6330 df-suc 6331 df-iota 6456 df-fun 6502 df-fn 6503 df-f 6504 df-f1 6505 df-fo 6506 df-f1o 6507 df-fv 6508 df-riota 7325 df-ov 7371 df-oprab 7372 df-mpo 7373 df-om 7819 df-1st 7943 df-2nd 7944 df-frecs 8233 df-wrecs 8264 df-recs 8313 df-rdg 8351 df-1o 8407 df-er 8645 df-map 8777 df-pm 8778 df-en 8896 df-dom 8897 df-sdom 8898 df-fin 8899 df-card 9863 df-pnf 11180 df-mnf 11181 df-xr 11182 df-ltxr 11183 df-le 11184 df-sub 11378 df-neg 11379 df-nn 12158 df-2 12220 df-n0 12414 df-xnn0 12487 df-z 12501 df-uz 12764 df-fz 13436 df-fzo 13583 df-seq 13937 df-hash 14266 df-word 14449 df-lsw 14498 df-concat 14506 df-s1 14532 df-substr 14577 df-pfx 14607 df-struct 17086 df-sets 17103 df-slot 17121 df-ndx 17133 df-base 17149 df-ress 17170 df-plusg 17202 df-0g 17373 df-gsum 17374 df-mgm 18577 df-sgrp 18656 df-mnd 18672 df-mhm 18720 df-submnd 18721 df-frmd 18786 df-vrmd 18787 df-mrex 35702 df-mex 35703 df-mrsub 35706 df-msub 35707

This theorem is referenced by: mclsppslem 35799

W3C validator