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 35518

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 2729	. . . . 5 ⊢ (mEx‘𝑇) = (mEx‘𝑇)
2		eqid 2729	. . . . 5 ⊢ (mRSubst‘𝑇) = (mRSubst‘𝑇)
3		msubco.s	. . . . 5 ⊢ 𝑆 = (mSubst‘𝑇)
4	1, 2, 3	elmsubrn 35515	. . . 4 ⊢ ran 𝑆 = ran (𝑓 ∈ ran (mRSubst‘𝑇) ↦ (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩))
5	4	eleq2i 2820	. . 3 ⊢ (𝐹 ∈ ran 𝑆 ↔ 𝐹 ∈ ran (𝑓 ∈ ran (mRSubst‘𝑇) ↦ (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩)))
6		eqid 2729	. . . 4 ⊢ (𝑓 ∈ ran (mRSubst‘𝑇) ↦ (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩)) = (𝑓 ∈ ran (mRSubst‘𝑇) ↦ (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩))
7		fvex 6871	. . . . 5 ⊢ (mEx‘𝑇) ∈ V
8	7	mptex 7197	. . . 4 ⊢ (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∈ V
9	6, 8	elrnmpti 5926	. . 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 35515	. . . 4 ⊢ ran 𝑆 = ran (𝑔 ∈ ran (mRSubst‘𝑇) ↦ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩))
12	11	eleq2i 2820	. . 3 ⊢ (𝐺 ∈ ran 𝑆 ↔ 𝐺 ∈ ran (𝑔 ∈ ran (mRSubst‘𝑇) ↦ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)))
13		eqid 2729	. . . 4 ⊢ (𝑔 ∈ ran (mRSubst‘𝑇) ↦ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)) = (𝑔 ∈ ran (mRSubst‘𝑇) ↦ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩))
14	7	mptex 7197	. . . 4 ⊢ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩) ∈ V
15	13, 14	elrnmpti 5926	. . 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 3209	. . 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 2729	. . . . . . . . . . . . 13 ⊢ (mTC‘𝑇) = (mTC‘𝑇)
20		eqid 2729	. . . . . . . . . . . . 13 ⊢ (mREx‘𝑇) = (mREx‘𝑇)
21	19, 1, 20	mexval 35489	. . . . . . . . . . . 12 ⊢ (mEx‘𝑇) = ((mTC‘𝑇) × (mREx‘𝑇))
22	18, 21	eleqtrdi 2838	. . . . . . . . . . 11 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → 𝑦 ∈ ((mTC‘𝑇) × (mREx‘𝑇)))
23		xp1st 8000	. . . . . . . . . . 11 ⊢ (𝑦 ∈ ((mTC‘𝑇) × (mREx‘𝑇)) → (1^st ‘𝑦) ∈ (mTC‘𝑇))
24	22, 23	syl 17	. . . . . . . . . 10 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → (1^st ‘𝑦) ∈ (mTC‘𝑇))
25	2, 20	mrsubf 35504	. . . . . . . . . . . 12 ⊢ (𝑔 ∈ ran (mRSubst‘𝑇) → 𝑔:(mREx‘𝑇)⟶(mREx‘𝑇))
26	25	ad2antlr 727	. . . . . . . . . . 11 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → 𝑔:(mREx‘𝑇)⟶(mREx‘𝑇))
27		xp2nd 8001	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ ((mTC‘𝑇) × (mREx‘𝑇)) → (2^nd ‘𝑦) ∈ (mREx‘𝑇))
28	22, 27	syl 17	. . . . . . . . . . 11 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → (2^nd ‘𝑦) ∈ (mREx‘𝑇))
29	26, 28	ffvelcdmd 7057	. . . . . . . . . 10 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → (𝑔‘(2^nd ‘𝑦)) ∈ (mREx‘𝑇))
30		opelxpi 5675	. . . . . . . . . 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 2839	. . . . . . . 8 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩ ∈ (mEx‘𝑇))
33		eqidd 2730	. . . . . . . 8 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩) = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩))
34		eqidd 2730	. . . . . . . 8 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) = (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩))
35		fvex 6871	. . . . . . . . . 10 ⊢ (1^st ‘𝑦) ∈ V
36		fvex 6871	. . . . . . . . . 10 ⊢ (𝑔‘(2^nd ‘𝑦)) ∈ V
37	35, 36	op1std 7978	. . . . . . . . 9 ⊢ (𝑥 = ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩ → (1^st ‘𝑥) = (1^st ‘𝑦))
38	35, 36	op2ndd 7979	. . . . . . . . . 10 ⊢ (𝑥 = ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩ → (2^nd ‘𝑥) = (𝑔‘(2^nd ‘𝑦)))
39	38	fveq2d 6862	. . . . . . . . 9 ⊢ (𝑥 = ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩ → (𝑓‘(2^nd ‘𝑥)) = (𝑓‘(𝑔‘(2^nd ‘𝑦))))
40	37, 39	opeq12d 4845	. . . . . . . 8 ⊢ (𝑥 = ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩ → ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩ = ⟨(1^st ‘𝑦), (𝑓‘(𝑔‘(2^nd ‘𝑦)))⟩)
41	32, 33, 34, 40	fmptco 7101	. . . . . . 7 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → ((𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∘ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)) = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑓‘(𝑔‘(2^nd ‘𝑦)))⟩))
42		fvco3 6960	. . . . . . . . . 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 4844	. . . . . . . 8 ⊢ (((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) ∧ 𝑦 ∈ (mEx‘𝑇)) → ⟨(1^st ‘𝑦), ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦))⟩ = ⟨(1^st ‘𝑦), (𝑓‘(𝑔‘(2^nd ‘𝑦)))⟩)
45	44	mpteq2dva 5200	. . . . . . 7 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦))⟩) = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑓‘(𝑔‘(2^nd ‘𝑦)))⟩))
46	41, 45	eqtr4d 2767	. . . . . 6 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → ((𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∘ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)) = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦))⟩))
47	2	mrsubco 35508	. . . . . . . 8 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → (𝑓 ∘ 𝑔) ∈ ran (mRSubst‘𝑇))
48	7	mptex 7197	. . . . . . . 8 ⊢ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦))⟩) ∈ V
49		eqid 2729	. . . . . . . . 9 ⊢ (ℎ ∈ ran (mRSubst‘𝑇) ↦ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (ℎ‘(2^nd ‘𝑦))⟩)) = (ℎ ∈ ran (mRSubst‘𝑇) ↦ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (ℎ‘(2^nd ‘𝑦))⟩))
50		fveq1 6857	. . . . . . . . . . 11 ⊢ (ℎ = (𝑓 ∘ 𝑔) → (ℎ‘(2^nd ‘𝑦)) = ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦)))
51	50	opeq2d 4844	. . . . . . . . . 10 ⊢ (ℎ = (𝑓 ∘ 𝑔) → ⟨(1^st ‘𝑦), (ℎ‘(2^nd ‘𝑦))⟩ = ⟨(1^st ‘𝑦), ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦))⟩)
52	51	mpteq2dv 5201	. . . . . . . . 9 ⊢ (ℎ = (𝑓 ∘ 𝑔) → (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (ℎ‘(2^nd ‘𝑦))⟩) = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦))⟩))
53	49, 52	elrnmpt1s 5923	. . . . . . . 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 35515	. . . . . . 7 ⊢ ran 𝑆 = ran (ℎ ∈ ran (mRSubst‘𝑇) ↦ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (ℎ‘(2^nd ‘𝑦))⟩))
56	54, 55	eleqtrrdi 2839	. . . . . 6 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), ((𝑓 ∘ 𝑔)‘(2^nd ‘𝑦))⟩) ∈ ran 𝑆)
57	46, 56	eqeltrd 2828	. . . . 5 ⊢ ((𝑓 ∈ ran (mRSubst‘𝑇) ∧ 𝑔 ∈ ran (mRSubst‘𝑇)) → ((𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∘ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)) ∈ ran 𝑆)
58		coeq1 5821	. . . . . . 7 ⊢ (𝐹 = (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) → (𝐹 ∘ 𝐺) = ((𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∘ 𝐺))
59		coeq2 5822	. . . . . . 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 2784	. . . . . 6 ⊢ ((𝐹 = (𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∧ 𝐺 = (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)) → (𝐹 ∘ 𝐺) = ((𝑥 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑥), (𝑓‘(2^nd ‘𝑥))⟩) ∘ (𝑦 ∈ (mEx‘𝑇) ↦ ⟨(1^st ‘𝑦), (𝑔‘(2^nd ‘𝑦))⟩)))
61	60	eleq1d 2813	. . . . 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 3179	. . 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 2109 ∃wrex 3053 Vcvv 3447 ⟨cop 4595 ↦ cmpt 5188 × cxp 5636 ran crn 5639 ∘ ccom 5642 ⟶wf 6507 ‘cfv 6511 1^st c1st 7966 2^nd c2nd 7967 mTCcmtc 35451 mRExcmrex 35453 mExcmex 35454 mRSubstcmrsub 35457 mSubstcmsub 35458

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 2008 ax-8 2111 ax-9 2119 ax-10 2142 ax-11 2158 ax-12 2178 ax-ext 2701 ax-rep 5234 ax-sep 5251 ax-nul 5261 ax-pow 5320 ax-pr 5387 ax-un 7711 ax-cnex 11124 ax-resscn 11125 ax-1cn 11126 ax-icn 11127 ax-addcl 11128 ax-addrcl 11129 ax-mulcl 11130 ax-mulrcl 11131 ax-mulcom 11132 ax-addass 11133 ax-mulass 11134 ax-distr 11135 ax-i2m1 11136 ax-1ne0 11137 ax-1rid 11138 ax-rnegex 11139 ax-rrecex 11140 ax-cnre 11141 ax-pre-lttri 11142 ax-pre-lttrn 11143 ax-pre-ltadd 11144 ax-pre-mulgt0 11145

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1543 df-fal 1553 df-ex 1780 df-nf 1784 df-sb 2066 df-mo 2533 df-eu 2562 df-clab 2708 df-cleq 2721 df-clel 2803 df-nfc 2878 df-ne 2926 df-nel 3030 df-ral 3045 df-rex 3054 df-rmo 3354 df-reu 3355 df-rab 3406 df-v 3449 df-sbc 3754 df-csb 3863 df-dif 3917 df-un 3919 df-in 3921 df-ss 3931 df-pss 3934 df-nul 4297 df-if 4489 df-pw 4565 df-sn 4590 df-pr 4592 df-op 4596 df-uni 4872 df-int 4911 df-iun 4957 df-br 5108 df-opab 5170 df-mpt 5189 df-tr 5215 df-id 5533 df-eprel 5538 df-po 5546 df-so 5547 df-fr 5591 df-we 5593 df-xp 5644 df-rel 5645 df-cnv 5646 df-co 5647 df-dm 5648 df-rn 5649 df-res 5650 df-ima 5651 df-pred 6274 df-ord 6335 df-on 6336 df-lim 6337 df-suc 6338 df-iota 6464 df-fun 6513 df-fn 6514 df-f 6515 df-f1 6516 df-fo 6517 df-f1o 6518 df-fv 6519 df-riota 7344 df-ov 7390 df-oprab 7391 df-mpo 7392 df-om 7843 df-1st 7968 df-2nd 7969 df-frecs 8260 df-wrecs 8291 df-recs 8340 df-rdg 8378 df-1o 8434 df-er 8671 df-map 8801 df-pm 8802 df-en 8919 df-dom 8920 df-sdom 8921 df-fin 8922 df-card 9892 df-pnf 11210 df-mnf 11211 df-xr 11212 df-ltxr 11213 df-le 11214 df-sub 11407 df-neg 11408 df-nn 12187 df-2 12249 df-n0 12443 df-xnn0 12516 df-z 12530 df-uz 12794 df-fz 13469 df-fzo 13616 df-seq 13967 df-hash 14296 df-word 14479 df-lsw 14528 df-concat 14536 df-s1 14561 df-substr 14606 df-pfx 14636 df-struct 17117 df-sets 17134 df-slot 17152 df-ndx 17164 df-base 17180 df-ress 17201 df-plusg 17233 df-0g 17404 df-gsum 17405 df-mgm 18567 df-sgrp 18646 df-mnd 18662 df-mhm 18710 df-submnd 18711 df-frmd 18776 df-vrmd 18777 df-mrex 35473 df-mex 35474 df-mrsub 35477 df-msub 35478

This theorem is referenced by: mclsppslem 35570

W3C validator