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 36023

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 2763	. . . . 5 ⊢ (mEx‘𝑇) = (mEx‘𝑇)
2		eqid 2763	. . . . 5 ⊢ (mRSubst‘𝑇) = (mRSubst‘𝑇)
3		msubco.s	. . . . 5 ⊢ 𝑆 = (mSubst‘𝑇)
4	1, 2, 3	elmsubrn 36020	. . . 4 ⊢ ran 𝑆 = ran (𝑓 ∈ ran (mRSubst‘𝑇) ↦ (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩))
5	4	eleq2i 2855	. . 3 ⊢ (𝐹 ∈ ran 𝑆 ↔ 𝐹 ∈ ran (𝑓 ∈ ran (mRSubst‘𝑇) ↦ (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩)))
6		eqid 2763	. . . 4 ⊢ (𝑓 ∈ ran (mRSubst‘𝑇) ↦ (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩)) = (𝑓 ∈ ran (mRSubst‘𝑇) ↦ (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩))
7		fvex 6894	. . . . 5 ⊢ (mEx‘𝑇) ∈ V
8	7	mptex 7221	. . . 4 ⊢ (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∈ V
9	6, 8	elrnmpti 5952	. . 3 ⊢ (𝐹 ∈ ran (𝑓 ∈ ran (mRSubst‘𝑇) ↦ (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩)) ↔ ∃𝑓 ∈ ran (mRSubst‘𝑇)𝐹 = (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩))
10	5, 9	bitri 278	. 2 ⊢ (𝐹 ∈ ran 𝑆 ↔ ∃𝑓 ∈ ran (mRSubst‘𝑇)𝐹 = (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩))
11	1, 2, 3	elmsubrn 36020	. . . 4 ⊢ ran 𝑆 = ran (𝑔 ∈ ran (mRSubst‘𝑇) ↦ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩))
12	11	eleq2i 2855	. . 3 ⊢ (𝐺 ∈ ran 𝑆 ↔ 𝐺 ∈ ran (𝑔 ∈ ran (mRSubst‘𝑇) ↦ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)))
13		eqid 2763	. . . 4 ⊢ (𝑔 ∈ ran (mRSubst‘𝑇) ↦ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)) = (𝑔 ∈ ran (mRSubst‘𝑇) ↦ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩))
14	7	mptex 7221	. . . 4 ⊢ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩) ∈ V
15	13, 14	elrnmpti 5952	. . 3 ⊢ (𝐺 ∈ ran (𝑔 ∈ ran (mRSubst‘𝑇) ↦ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)) ↔ ∃𝑔 ∈ ran (mRSubst‘𝑇)𝐺 = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩))
16	12, 15	bitri 278	. 2 ⊢ (𝐺 ∈ ran 𝑆 ↔ ∃𝑔 ∈ ran (mRSubst‘𝑇)𝐺 = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩))
17		reeanv 3237	. . 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 489	. . . . . . . . . . . 12 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → 𝑦 ∈ (mEx‘𝑇))
19		eqid 2763	. . . . . . . . . . . . 13 ⊢ (mTC‘𝑇) = (mTC‘𝑇)
20		eqid 2763	. . . . . . . . . . . . 13 ⊢ (mREx‘𝑇) = (mREx‘𝑇)
21	19, 1, 20	mexval 35994	. . . . . . . . . . . 12 ⊢ (mEx‘𝑇) = ((mTC‘𝑇) × (mREx‘𝑇))
22	18, 21	eleqtrdi 2873	. . . . . . . . . . 11 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → 𝑦 ∈ ((mTC‘𝑇) × (mREx‘𝑇)))
23		xp1st 8014	. . . . . . . . . . 11 ⊢ (𝑦 ∈ ((mTC‘𝑇) × (mREx‘𝑇)) → (1^st ‘𝑦) ∈ (mTC‘𝑇))
24	22, 23	syl 18	. . . . . . . . . 10 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → (1^st ‘𝑦) ∈ (mTC‘𝑇))
25	2, 20	mrsubf 36009	. . . . . . . . . . . 12 ⊢ (𝑔 ∈ ran (mRSubst‘𝑇) → 𝑔:(mREx‘𝑇)⟶(mREx‘𝑇))
26	25	ad2antlr 739	. . . . . . . . . . 11 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → 𝑔:(mREx‘𝑇)⟶(mREx‘𝑇))
27		xp2nd 8015	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ ((mTC‘𝑇) × (mREx‘𝑇)) → (2^nd ‘𝑦) ∈ (mREx‘𝑇))
28	22, 27	syl 18	. . . . . . . . . . 11 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → (2^nd ‘𝑦) ∈ (mREx‘𝑇))
29	26, 28	ffvelcdmd 7080	. . . . . . . . . 10 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → (𝑔‘(2^nd ‘𝑦)) ∈ (mREx‘𝑇))
30		opelxpi 5698	. . . . . . . . . 10 ⊢ (((1^st ‘𝑦) ∈ (mTC‘𝑇) ∧ (𝑔‘(2^nd ‘𝑦)) ∈ (mREx‘𝑇)) → ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩ ∈ ((mTC‘𝑇) × (mREx‘𝑇)))
31	24, 29, 30	syl2anc 595	. . . . . . . . 9 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩ ∈ ((mTC‘𝑇) × (mREx‘𝑇)))
32	31, 21	eleqtrrdi 2874	. . . . . . . 8 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩ ∈ (mEx‘𝑇))
33		eqidd 2764	. . . . . . . 8 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩) = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩))
34		eqidd 2764	. . . . . . . 8 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) = (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩))
35		fvex 6894	. . . . . . . . . 10 ⊢ (1^st ‘𝑦) ∈ V
36		fvex 6894	. . . . . . . . . 10 ⊢ (𝑔‘(2^nd ‘𝑦)) ∈ V
37	35, 36	op1std 7992	. . . . . . . . 9 ⊢ (𝑥 = ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩ → (1^st ‘𝑥) = (1^st ‘𝑦))
38	35, 36	op2ndd 7993	. . . . . . . . . 10 ⊢ (𝑥 = ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩ → (2^nd ‘𝑥) = (𝑔‘(2^nd ‘𝑦)))
39	38	fveq2d 6885	. . . . . . . . 9 ⊢ (𝑥 = ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩ → (𝑓‘(2^nd ‘𝑥)) = (𝑓‘(𝑔‘(2^nd ‘𝑦))))
40	37, 39	opeq12d 4846	. . . . . . . 8 ⊢ (𝑥 = ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩ → ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩ = ⟨(1^st ‘𝑦), (𝑓‘(𝑔‘(2^nd ‘𝑦)))⟩)
41	32, 33, 34, 40	fmptco 7125	. . . . . . 7 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → ((𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∘ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)) = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑓‘(𝑔‘(2^nd ‘𝑦)))⟩))
42		fvco3 6981	. . . . . . . . . 10 ⊢ ((𝑔:(mREx‘𝑇)⟶(mREx‘𝑇) ∧ (2^nd ‘𝑦) ∈ (mREx‘𝑇)) → ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦)) = (𝑓‘(𝑔‘(2^nd ‘𝑦))))
43	26, 28, 42	syl2anc 595	. . . . . . . . 9 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦)) = (𝑓‘(𝑔‘(2^nd ‘𝑦))))
44	43	opeq2d 4845	. . . . . . . 8 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → ⟨(1^st ‘𝑦), ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦))⟩ = ⟨(1^st ‘𝑦), (𝑓‘(𝑔‘(2^nd ‘𝑦)))⟩)
45	44	mpteq2dva 5204	. . . . . . 7 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦))⟩) = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑓‘(𝑔‘(2^nd ‘𝑦)))⟩))
46	41, 45	eqtr4d 2801	. . . . . 6 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → ((𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∘ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)) = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦))⟩))
47	2	mrsubco 36013	. . . . . . . 8 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → (𝑓 ∘ 𝑔) ∈ ran (mRSubst‘𝑇))
48	7	mptex 7221	. . . . . . . 8 ⊢ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦))⟩) ∈ V
49		eqid 2763	. . . . . . . . 9 ⊢ (ℎ ∈ ran (mRSubst‘𝑇) ↦ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (ℎ‘(2^nd ‘𝑦))⟩)) = (ℎ ∈ ran (mRSubst‘𝑇) ↦ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (ℎ‘(2^nd ‘𝑦))⟩))
50		fveq1 6880	. . . . . . . . . . 11 ⊢ (ℎ = (𝑓 ∘ 𝑔) → (ℎ‘(2^nd ‘𝑦)) = ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦)))
51	50	opeq2d 4845	. . . . . . . . . 10 ⊢ (ℎ = (𝑓 ∘ 𝑔) → ⟨(1^st ‘𝑦), (ℎ‘(2^nd ‘𝑦))⟩ = ⟨(1^st ‘𝑦), ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦))⟩)
52	51	mpteq2dv 5205	. . . . . . . . 9 ⊢ (ℎ = (𝑓 ∘ 𝑔) → (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (ℎ‘(2^nd ‘𝑦))⟩) = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦))⟩))
53	49, 52	elrnmpt1s 5949	. . . . . . . 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 597	. . . . . . 7 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦))⟩) ∈ ran (ℎ ∈ ran (mRSubst‘𝑇) ↦ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (ℎ‘(2^nd ‘𝑦))⟩)))
55	1, 2, 3	elmsubrn 36020	. . . . . . 7 ⊢ ran 𝑆 = ran (ℎ ∈ ran (mRSubst‘𝑇) ↦ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (ℎ‘(2^nd ‘𝑦))⟩))
56	54, 55	eleqtrrdi 2874	. . . . . 6 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦))⟩) ∈ ran 𝑆)
57	46, 56	eqeltrd 2863	. . . . 5 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → ((𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∘ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)) ∈ ran 𝑆)
58		coeq1 5843	. . . . . . 7 ⊢ (𝐹 = (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) → (𝐹 ∘ 𝐺) = ((𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∘ 𝐺))
59		coeq2 5844	. . . . . . 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 2818	. . . . . 6 ⊢ ((𝐹 = (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∧ 𝐺 = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)) → (𝐹 ∘ 𝐺) = ((𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∘ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)))
61	60	eleq1d 2848	. . . . 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 250	. . . 4 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → ((𝐹 = (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∧ 𝐺 = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)) → (𝐹 ∘ 𝐺) ∈ ran 𝑆))
63	62	rexlimivv 3207	. . 3 ⊢ (∃𝑓 ∈ ran (mRSubst‘𝑇)∃𝑔 ∈ ran (mRSubst‘𝑇)(𝐹 = (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∧ 𝐺 = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)) → (𝐹 ∘ 𝐺) ∈ ran 𝑆)
64	17, 63	sylbir 238	. 2 ⊢ ((∃𝑓 ∈ ran (mRSubst‘𝑇)𝐹 = (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∧ ∃𝑔 ∈ ran (mRSubst‘𝑇)𝐺 = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)) → (𝐹 ∘ 𝐺) ∈ ran 𝑆)
65	10, 16, 64	syl2anb 609	1 ⊢ ((𝐹 ∈ ran 𝑆 ∧ 𝐺 ∈ ran 𝑆) → (𝐹 ∘ 𝐺) ∈ ran 𝑆)

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 400 = wceq 1570 ∈ wcel 2143 ∃wrex 3089 Vcvv 3455 ⟨cop 4595 ↦ cmpt 5192 × cxp 5659 ran crn 5662 ∘ ccom 5665 ⟶wf 6532 ‘cfv 6536 1^st c1st 7980 2^nd c2nd 7981 mTCcmtc 35956 mRExcmrex 35958 mExcmex 35959 mRSubstcmrsub 35962 mSubstcmsub 35963

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1825 ax-4 1839 ax-5 1940 ax-6 1997 ax-7 2038 ax-8 2145 ax-9 2153 ax-10 2176 ax-11 2192 ax-12 2213 ax-ext 2735 ax-rep 5238 ax-sep 5257 ax-nul 5269 ax-pow 5336 ax-pr 5404 ax-un 7732 ax-cnex 11151 ax-resscn 11152 ax-1cn 11153 ax-icn 11154 ax-addcl 11155 ax-addrcl 11156 ax-mulcl 11157 ax-mulrcl 11158 ax-mulcom 11159 ax-addass 11160 ax-mulass 11161 ax-distr 11162 ax-i2m1 11163 ax-1ne0 11164 ax-1rid 11165 ax-rnegex 11166 ax-rrecex 11167 ax-cnre 11168 ax-pre-lttri 11169 ax-pre-lttrn 11170 ax-pre-ltadd 11171 ax-pre-mulgt0 11172

This theorem depends on definitions: df-bi 210 df-an 401 df-or 861 df-3or 1104 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1810 df-nf 1814 df-sb 2097 df-mo 2567 df-eu 2597 df-clab 2742 df-cleq 2755 df-clel 2838 df-nfc 2912 df-ne 2959 df-nel 3065 df-ral 3080 df-rex 3090 df-rmo 3369 df-reu 3370 df-rab 3417 df-v 3457 df-sbc 3745 df-csb 3854 df-dif 3908 df-un 3910 df-in 3912 df-ss 3922 df-pss 3925 df-nul 4287 df-if 4488 df-pw 4564 df-sn 4590 df-pr 4592 df-op 4596 df-uni 4873 df-int 4913 df-iun 4958 df-br 5110 df-opab 5174 df-mpt 5193 df-tr 5219 df-id 5556 df-eprel 5561 df-po 5569 df-so 5570 df-fr 5614 df-we 5616 df-xp 5667 df-rel 5668 df-cnv 5669 df-co 5670 df-dm 5671 df-rn 5672 df-res 5673 df-ima 5674 df-pred 6302 df-ord 6363 df-on 6364 df-lim 6365 df-suc 6366 df-iota 6492 df-fun 6538 df-fn 6539 df-f 6540 df-f1 6541 df-fo 6542 df-f1o 6543 df-fv 6544 df-riota 7367 df-ov 7413 df-oprab 7414 df-mpo 7415 df-om 7859 df-1st 7982 df-2nd 7983 df-frecs 8274 df-wrecs 8305 df-recs 8354 df-rdg 8393 df-1o 8449 df-er 8690 df-map 8822 df-pm 8823 df-en 8940 df-dom 8941 df-sdom 8942 df-fin 8943 df-card 9921 df-pnf 11240 df-mnf 11241 df-xr 11242 df-ltxr 11243 df-le 11244 df-sub 11438 df-neg 11439 df-nn 12229 df-2 12298 df-n0 12500 df-xnn0 12573 df-z 12587 df-uz 12858 df-fz 13531 df-fzo 13679 df-seq 14034 df-hash 14363 df-word 14547 df-lsw 14596 df-concat 14604 df-s1 14630 df-substr 14675 df-pfx 14705 df-struct 17202 df-sets 17219 df-slot 17237 df-ndx 17249 df-base 17265 df-ress 17286 df-plusg 17318 df-0g 17489 df-gsum 17490 df-mgm 18693 df-sgrp 18772 df-mnd 18788 df-mhm 18836 df-submnd 18837 df-frmd 18903 df-vrmd 18904 df-mrex 35978 df-mex 35979 df-mrsub 35982 df-msub 35983

This theorem is referenced by: mclsppslem 36075

W3C validator