uptrlem1 - Mathbox for Zhi Wang

	Mathbox for Zhi Wang		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > uptrlem1		Structured version Visualization version GIF version

Theorem uptrlem1 49685

Description: Lemma for uptr 49688. (Contributed by Zhi Wang, 16-Nov-2025.)

**Hypotheses**
Ref	Expression
uptrlem1.h	⊢ 𝐻 = (Hom ‘𝐶)
uptrlem1.i	⊢ 𝐼 = (Hom ‘𝐷)
uptrlem1.j	⊢ 𝐽 = (Hom ‘𝐸)
uptrlem1.d	⊢ ∙ = (comp‘𝐷)
uptrlem1.e	⊢ ⚬ = (comp‘𝐸)
uptrlem1.x	⊢ (𝜑 → 𝑋 ∈ (Base‘𝐷))
uptrlem1.y	⊢ (𝜑 → (𝑀‘𝑋) = 𝑌)
uptrlem1.z	⊢ (𝜑 → 𝑍 ∈ (Base‘𝐶))
uptrlem1.w	⊢ (𝜑 → 𝑊 ∈ (Base‘𝐶))
uptrlem1.a	⊢ (𝜑 → 𝐴 ∈ (𝑋𝐼(𝐹‘𝑍)))
uptrlem1.b	⊢ (𝜑 → ((𝑋𝑁(𝐹‘𝑍))‘𝐴) = 𝐵)
uptrlem1.f	⊢ (𝜑 → 𝐹(𝐶 Func 𝐷)𝐺)
uptrlem1.m	⊢ (𝜑 → 𝑀((𝐷 Full 𝐸) ∩ (𝐷 Faith 𝐸))𝑁)
uptrlem1.k	⊢ (𝜑 → (⟨𝑀, 𝑁⟩ ∘_func ⟨𝐹, 𝐺⟩) = ⟨𝐾, 𝐿⟩)

**Assertion**
Ref	Expression
uptrlem1	⊢ (𝜑 → (∀ℎ ∈ (𝑌𝐽(𝐾‘𝑊))∃!𝑘 ∈ (𝑍𝐻𝑊)ℎ = (((𝑍𝐿𝑊)‘𝑘)(⟨𝑌, (𝐾‘𝑍)⟩ ⚬ (𝐾‘𝑊))𝐵) ↔ ∀𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))∃!𝑘 ∈ (𝑍𝐻𝑊)𝑔 = (((𝑍𝐺𝑊)‘𝑘)(⟨𝑋, (𝐹‘𝑍)⟩ ∙ (𝐹‘𝑊))𝐴)))

Distinct variable groups: ⚬ ,𝑔 ∙ ,ℎ 𝐴,ℎ 𝐵,𝑔 𝑔,𝐹,ℎ,𝑘 ℎ,𝐺 𝑔,𝐻,ℎ 𝑔,𝐼,ℎ,𝑘 𝑔,𝐽,ℎ 𝑔,𝐾,ℎ 𝑔,𝐿 𝑔,𝑁,ℎ,𝑘 𝑔,𝑊,ℎ,𝑘 𝑔,𝑋,ℎ,𝑘 𝑔,𝑌,ℎ 𝑔,𝑍,ℎ 𝜑,𝑔,ℎ,𝑘 Allowed substitution hints: 𝐴(𝑔,𝑘) 𝐵(ℎ,𝑘) 𝐶(𝑔,ℎ,𝑘) 𝐷(𝑔,ℎ,𝑘) ∙ (𝑔,𝑘) 𝐸(𝑔,ℎ,𝑘) 𝐺(𝑔,𝑘) 𝐻(𝑘) 𝐽(𝑘) 𝐾(𝑘) 𝐿(ℎ,𝑘) 𝑀(𝑔,ℎ,𝑘) 𝑌(𝑘) ⚬ (ℎ,𝑘) 𝑍(𝑘)

**Proof of Theorem uptrlem1**
Step	Hyp	Ref	Expression
1		eqid 2736	. . . . . 6 ⊢ (Base‘𝐷) = (Base‘𝐷)
2		uptrlem1.i	. . . . . 6 ⊢ 𝐼 = (Hom ‘𝐷)
3		uptrlem1.j	. . . . . 6 ⊢ 𝐽 = (Hom ‘𝐸)
4		uptrlem1.m	. . . . . 6 ⊢ (𝜑 → 𝑀((𝐷 Full 𝐸) ∩ (𝐷 Faith 𝐸))𝑁)
5		uptrlem1.x	. . . . . 6 ⊢ (𝜑 → 𝑋 ∈ (Base‘𝐷))
6		eqid 2736	. . . . . . . 8 ⊢ (Base‘𝐶) = (Base‘𝐶)
7		uptrlem1.f	. . . . . . . 8 ⊢ (𝜑 → 𝐹(𝐶 Func 𝐷)𝐺)
8	6, 1, 7	funcf1 17833	. . . . . . 7 ⊢ (𝜑 → 𝐹:(Base‘𝐶)⟶(Base‘𝐷))
9		uptrlem1.w	. . . . . . 7 ⊢ (𝜑 → 𝑊 ∈ (Base‘𝐶))
10	8, 9	ffvelcdmd 7037	. . . . . 6 ⊢ (𝜑 → (𝐹‘𝑊) ∈ (Base‘𝐷))
11	1, 2, 3, 4, 5, 10	ffthf1o 17888	. . . . 5 ⊢ (𝜑 → (𝑋𝑁(𝐹‘𝑊)):(𝑋𝐼(𝐹‘𝑊))–1-1-onto→((𝑀‘𝑋)𝐽(𝑀‘(𝐹‘𝑊))))
12		uptrlem1.y	. . . . . . 7 ⊢ (𝜑 → (𝑀‘𝑋) = 𝑌)
13		inss1 4177	. . . . . . . . . . 11 ⊢ ((𝐷 Full 𝐸) ∩ (𝐷 Faith 𝐸)) ⊆ (𝐷 Full 𝐸)
14		fullfunc 17875	. . . . . . . . . . 11 ⊢ (𝐷 Full 𝐸) ⊆ (𝐷 Func 𝐸)
15	13, 14	sstri 3931	. . . . . . . . . 10 ⊢ ((𝐷 Full 𝐸) ∩ (𝐷 Faith 𝐸)) ⊆ (𝐷 Func 𝐸)
16	15	ssbri 5130	. . . . . . . . 9 ⊢ (𝑀((𝐷 Full 𝐸) ∩ (𝐷 Faith 𝐸))𝑁 → 𝑀(𝐷 Func 𝐸)𝑁)
17	4, 16	syl 17	. . . . . . . 8 ⊢ (𝜑 → 𝑀(𝐷 Func 𝐸)𝑁)
18		uptrlem1.k	. . . . . . . 8 ⊢ (𝜑 → (⟨𝑀, 𝑁⟩ ∘_func ⟨𝐹, 𝐺⟩) = ⟨𝐾, 𝐿⟩)
19	6, 7, 17, 18, 9	cofu1a 49569	. . . . . . 7 ⊢ (𝜑 → (𝑀‘(𝐹‘𝑊)) = (𝐾‘𝑊))
20	12, 19	oveq12d 7385	. . . . . 6 ⊢ (𝜑 → ((𝑀‘𝑋)𝐽(𝑀‘(𝐹‘𝑊))) = (𝑌𝐽(𝐾‘𝑊)))
21	20	f1oeq3d 6777	. . . . 5 ⊢ (𝜑 → ((𝑋𝑁(𝐹‘𝑊)):(𝑋𝐼(𝐹‘𝑊))–1-1-onto→((𝑀‘𝑋)𝐽(𝑀‘(𝐹‘𝑊))) ↔ (𝑋𝑁(𝐹‘𝑊)):(𝑋𝐼(𝐹‘𝑊))–1-1-onto→(𝑌𝐽(𝐾‘𝑊))))
22	11, 21	mpbid 232	. . . 4 ⊢ (𝜑 → (𝑋𝑁(𝐹‘𝑊)):(𝑋𝐼(𝐹‘𝑊))–1-1-onto→(𝑌𝐽(𝐾‘𝑊)))
23		f1of 6780	. . . 4 ⊢ ((𝑋𝑁(𝐹‘𝑊)):(𝑋𝐼(𝐹‘𝑊))–1-1-onto→(𝑌𝐽(𝐾‘𝑊)) → (𝑋𝑁(𝐹‘𝑊)):(𝑋𝐼(𝐹‘𝑊))⟶(𝑌𝐽(𝐾‘𝑊)))
24	22, 23	syl 17	. . 3 ⊢ (𝜑 → (𝑋𝑁(𝐹‘𝑊)):(𝑋𝐼(𝐹‘𝑊))⟶(𝑌𝐽(𝐾‘𝑊)))
25	24	ffvelcdmda 7036	. 2 ⊢ ((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) → ((𝑋𝑁(𝐹‘𝑊))‘𝑔) ∈ (𝑌𝐽(𝐾‘𝑊)))
26		f1ofo 6787	. . . 4 ⊢ ((𝑋𝑁(𝐹‘𝑊)):(𝑋𝐼(𝐹‘𝑊))–1-1-onto→(𝑌𝐽(𝐾‘𝑊)) → (𝑋𝑁(𝐹‘𝑊)):(𝑋𝐼(𝐹‘𝑊))–onto→(𝑌𝐽(𝐾‘𝑊)))
27	22, 26	syl 17	. . 3 ⊢ (𝜑 → (𝑋𝑁(𝐹‘𝑊)):(𝑋𝐼(𝐹‘𝑊))–onto→(𝑌𝐽(𝐾‘𝑊)))
28		foelrn 7059	. . 3 ⊢ (((𝑋𝑁(𝐹‘𝑊)):(𝑋𝐼(𝐹‘𝑊))–onto→(𝑌𝐽(𝐾‘𝑊)) ∧ ℎ ∈ (𝑌𝐽(𝐾‘𝑊))) → ∃𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))ℎ = ((𝑋𝑁(𝐹‘𝑊))‘𝑔))
29	27, 28	sylan 581	. 2 ⊢ ((𝜑 ∧ ℎ ∈ (𝑌𝐽(𝐾‘𝑊))) → ∃𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))ℎ = ((𝑋𝑁(𝐹‘𝑊))‘𝑔))
30		simpl3 1195	. . . . 5 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊)) ∧ ℎ = ((𝑋𝑁(𝐹‘𝑊))‘𝑔)) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → ℎ = ((𝑋𝑁(𝐹‘𝑊))‘𝑔))
31	30	eqeq1d 2738	. . . 4 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊)) ∧ ℎ = ((𝑋𝑁(𝐹‘𝑊))‘𝑔)) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → (ℎ = (((𝑍𝐿𝑊)‘𝑘)(⟨𝑌, (𝐾‘𝑍)⟩ ⚬ (𝐾‘𝑊))𝐵) ↔ ((𝑋𝑁(𝐹‘𝑊))‘𝑔) = (((𝑍𝐿𝑊)‘𝑘)(⟨𝑌, (𝐾‘𝑍)⟩ ⚬ (𝐾‘𝑊))𝐵)))
32		uptrlem1.d	. . . . . . . . 9 ⊢ ∙ = (comp‘𝐷)
33		uptrlem1.e	. . . . . . . . 9 ⊢ ⚬ = (comp‘𝐸)
34	17	ad2antrr 727	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → 𝑀(𝐷 Func 𝐸)𝑁)
35	5	ad2antrr 727	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → 𝑋 ∈ (Base‘𝐷))
36		uptrlem1.z	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑍 ∈ (Base‘𝐶))
37	8, 36	ffvelcdmd 7037	. . . . . . . . . 10 ⊢ (𝜑 → (𝐹‘𝑍) ∈ (Base‘𝐷))
38	37	ad2antrr 727	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → (𝐹‘𝑍) ∈ (Base‘𝐷))
39	10	ad2antrr 727	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → (𝐹‘𝑊) ∈ (Base‘𝐷))
40		uptrlem1.a	. . . . . . . . . 10 ⊢ (𝜑 → 𝐴 ∈ (𝑋𝐼(𝐹‘𝑍)))
41	40	ad2antrr 727	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → 𝐴 ∈ (𝑋𝐼(𝐹‘𝑍)))
42		uptrlem1.h	. . . . . . . . . . . 12 ⊢ 𝐻 = (Hom ‘𝐶)
43	6, 42, 2, 7, 36, 9	funcf2 17835	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑍𝐺𝑊):(𝑍𝐻𝑊)⟶((𝐹‘𝑍)𝐼(𝐹‘𝑊)))
44	43	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) → (𝑍𝐺𝑊):(𝑍𝐻𝑊)⟶((𝐹‘𝑍)𝐼(𝐹‘𝑊)))
45	44	ffvelcdmda 7036	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → ((𝑍𝐺𝑊)‘𝑘) ∈ ((𝐹‘𝑍)𝐼(𝐹‘𝑊)))
46	1, 2, 32, 33, 34, 35, 38, 39, 41, 45	funcco 17838	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → ((𝑋𝑁(𝐹‘𝑊))‘(((𝑍𝐺𝑊)‘𝑘)(⟨𝑋, (𝐹‘𝑍)⟩ ∙ (𝐹‘𝑊))𝐴)) = ((((𝐹‘𝑍)𝑁(𝐹‘𝑊))‘((𝑍𝐺𝑊)‘𝑘))(⟨(𝑀‘𝑋), (𝑀‘(𝐹‘𝑍))⟩ ⚬ (𝑀‘(𝐹‘𝑊)))((𝑋𝑁(𝐹‘𝑍))‘𝐴)))
47	12	ad2antrr 727	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → (𝑀‘𝑋) = 𝑌)
48	6, 7, 17, 18, 36	cofu1a 49569	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑀‘(𝐹‘𝑍)) = (𝐾‘𝑍))
49	48	ad2antrr 727	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → (𝑀‘(𝐹‘𝑍)) = (𝐾‘𝑍))
50	47, 49	opeq12d 4824	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → ⟨(𝑀‘𝑋), (𝑀‘(𝐹‘𝑍))⟩ = ⟨𝑌, (𝐾‘𝑍)⟩)
51	19	ad2antrr 727	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → (𝑀‘(𝐹‘𝑊)) = (𝐾‘𝑊))
52	50, 51	oveq12d 7385	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → (⟨(𝑀‘𝑋), (𝑀‘(𝐹‘𝑍))⟩ ⚬ (𝑀‘(𝐹‘𝑊))) = (⟨𝑌, (𝐾‘𝑍)⟩ ⚬ (𝐾‘𝑊)))
53	7	ad2antrr 727	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → 𝐹(𝐶 Func 𝐷)𝐺)
54	18	ad2antrr 727	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → (⟨𝑀, 𝑁⟩ ∘_func ⟨𝐹, 𝐺⟩) = ⟨𝐾, 𝐿⟩)
55	36	ad2antrr 727	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → 𝑍 ∈ (Base‘𝐶))
56	9	ad2antrr 727	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → 𝑊 ∈ (Base‘𝐶))
57		simpr 484	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → 𝑘 ∈ (𝑍𝐻𝑊))
58	6, 53, 34, 54, 55, 56, 42, 57	cofu2a 49570	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → (((𝐹‘𝑍)𝑁(𝐹‘𝑊))‘((𝑍𝐺𝑊)‘𝑘)) = ((𝑍𝐿𝑊)‘𝑘))
59		uptrlem1.b	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑋𝑁(𝐹‘𝑍))‘𝐴) = 𝐵)
60	59	ad2antrr 727	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → ((𝑋𝑁(𝐹‘𝑍))‘𝐴) = 𝐵)
61	52, 58, 60	oveq123d 7388	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → ((((𝐹‘𝑍)𝑁(𝐹‘𝑊))‘((𝑍𝐺𝑊)‘𝑘))(⟨(𝑀‘𝑋), (𝑀‘(𝐹‘𝑍))⟩ ⚬ (𝑀‘(𝐹‘𝑊)))((𝑋𝑁(𝐹‘𝑍))‘𝐴)) = (((𝑍𝐿𝑊)‘𝑘)(⟨𝑌, (𝐾‘𝑍)⟩ ⚬ (𝐾‘𝑊))𝐵))
62	46, 61	eqtrd 2771	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → ((𝑋𝑁(𝐹‘𝑊))‘(((𝑍𝐺𝑊)‘𝑘)(⟨𝑋, (𝐹‘𝑍)⟩ ∙ (𝐹‘𝑊))𝐴)) = (((𝑍𝐿𝑊)‘𝑘)(⟨𝑌, (𝐾‘𝑍)⟩ ⚬ (𝐾‘𝑊))𝐵))
63	62	eqeq2d 2747	. . . . . 6 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → (((𝑋𝑁(𝐹‘𝑊))‘𝑔) = ((𝑋𝑁(𝐹‘𝑊))‘(((𝑍𝐺𝑊)‘𝑘)(⟨𝑋, (𝐹‘𝑍)⟩ ∙ (𝐹‘𝑊))𝐴)) ↔ ((𝑋𝑁(𝐹‘𝑊))‘𝑔) = (((𝑍𝐿𝑊)‘𝑘)(⟨𝑌, (𝐾‘𝑍)⟩ ⚬ (𝐾‘𝑊))𝐵)))
64		f1of1 6779	. . . . . . . . 9 ⊢ ((𝑋𝑁(𝐹‘𝑊)):(𝑋𝐼(𝐹‘𝑊))–1-1-onto→(𝑌𝐽(𝐾‘𝑊)) → (𝑋𝑁(𝐹‘𝑊)):(𝑋𝐼(𝐹‘𝑊))–1-1→(𝑌𝐽(𝐾‘𝑊)))
65	22, 64	syl 17	. . . . . . . 8 ⊢ (𝜑 → (𝑋𝑁(𝐹‘𝑊)):(𝑋𝐼(𝐹‘𝑊))–1-1→(𝑌𝐽(𝐾‘𝑊)))
66	65	ad2antrr 727	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → (𝑋𝑁(𝐹‘𝑊)):(𝑋𝐼(𝐹‘𝑊))–1-1→(𝑌𝐽(𝐾‘𝑊)))
67		simplr 769	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊)))
68	34	funcrcl2 49554	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → 𝐷 ∈ Cat)
69	1, 2, 32, 68, 35, 38, 39, 41, 45	catcocl 17651	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → (((𝑍𝐺𝑊)‘𝑘)(⟨𝑋, (𝐹‘𝑍)⟩ ∙ (𝐹‘𝑊))𝐴) ∈ (𝑋𝐼(𝐹‘𝑊)))
70		f1fveq 7217	. . . . . . 7 ⊢ (((𝑋𝑁(𝐹‘𝑊)):(𝑋𝐼(𝐹‘𝑊))–1-1→(𝑌𝐽(𝐾‘𝑊)) ∧ (𝑔 ∈ (𝑋𝐼(𝐹‘𝑊)) ∧ (((𝑍𝐺𝑊)‘𝑘)(⟨𝑋, (𝐹‘𝑍)⟩ ∙ (𝐹‘𝑊))𝐴) ∈ (𝑋𝐼(𝐹‘𝑊)))) → (((𝑋𝑁(𝐹‘𝑊))‘𝑔) = ((𝑋𝑁(𝐹‘𝑊))‘(((𝑍𝐺𝑊)‘𝑘)(⟨𝑋, (𝐹‘𝑍)⟩ ∙ (𝐹‘𝑊))𝐴)) ↔ 𝑔 = (((𝑍𝐺𝑊)‘𝑘)(⟨𝑋, (𝐹‘𝑍)⟩ ∙ (𝐹‘𝑊))𝐴)))
71	66, 67, 69, 70	syl12anc 837	. . . . . 6 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → (((𝑋𝑁(𝐹‘𝑊))‘𝑔) = ((𝑋𝑁(𝐹‘𝑊))‘(((𝑍𝐺𝑊)‘𝑘)(⟨𝑋, (𝐹‘𝑍)⟩ ∙ (𝐹‘𝑊))𝐴)) ↔ 𝑔 = (((𝑍𝐺𝑊)‘𝑘)(⟨𝑋, (𝐹‘𝑍)⟩ ∙ (𝐹‘𝑊))𝐴)))
72	63, 71	bitr3d 281	. . . . 5 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → (((𝑋𝑁(𝐹‘𝑊))‘𝑔) = (((𝑍𝐿𝑊)‘𝑘)(⟨𝑌, (𝐾‘𝑍)⟩ ⚬ (𝐾‘𝑊))𝐵) ↔ 𝑔 = (((𝑍𝐺𝑊)‘𝑘)(⟨𝑋, (𝐹‘𝑍)⟩ ∙ (𝐹‘𝑊))𝐴)))
73	72	3adantl3 1170	. . . 4 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊)) ∧ ℎ = ((𝑋𝑁(𝐹‘𝑊))‘𝑔)) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → (((𝑋𝑁(𝐹‘𝑊))‘𝑔) = (((𝑍𝐿𝑊)‘𝑘)(⟨𝑌, (𝐾‘𝑍)⟩ ⚬ (𝐾‘𝑊))𝐵) ↔ 𝑔 = (((𝑍𝐺𝑊)‘𝑘)(⟨𝑋, (𝐹‘𝑍)⟩ ∙ (𝐹‘𝑊))𝐴)))
74	31, 73	bitrd 279	. . 3 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊)) ∧ ℎ = ((𝑋𝑁(𝐹‘𝑊))‘𝑔)) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → (ℎ = (((𝑍𝐿𝑊)‘𝑘)(⟨𝑌, (𝐾‘𝑍)⟩ ⚬ (𝐾‘𝑊))𝐵) ↔ 𝑔 = (((𝑍𝐺𝑊)‘𝑘)(⟨𝑋, (𝐹‘𝑍)⟩ ∙ (𝐹‘𝑊))𝐴)))
75	74	reubidva 3356	. 2 ⊢ ((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊)) ∧ ℎ = ((𝑋𝑁(𝐹‘𝑊))‘𝑔)) → (∃!𝑘 ∈ (𝑍𝐻𝑊)ℎ = (((𝑍𝐿𝑊)‘𝑘)(⟨𝑌, (𝐾‘𝑍)⟩ ⚬ (𝐾‘𝑊))𝐵) ↔ ∃!𝑘 ∈ (𝑍𝐻𝑊)𝑔 = (((𝑍𝐺𝑊)‘𝑘)(⟨𝑋, (𝐹‘𝑍)⟩ ∙ (𝐹‘𝑊))𝐴)))
76	25, 29, 75	ralxfrd2 5354	1 ⊢ (𝜑 → (∀ℎ ∈ (𝑌𝐽(𝐾‘𝑊))∃!𝑘 ∈ (𝑍𝐻𝑊)ℎ = (((𝑍𝐿𝑊)‘𝑘)(⟨𝑌, (𝐾‘𝑍)⟩ ⚬ (𝐾‘𝑊))𝐵) ↔ ∀𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))∃!𝑘 ∈ (𝑍𝐻𝑊)𝑔 = (((𝑍𝐺𝑊)‘𝑘)(⟨𝑋, (𝐹‘𝑍)⟩ ∙ (𝐹‘𝑊))𝐴)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 206 ∧ wa 395 ∧ w3a 1087 = wceq 1542 ∈ wcel 2114 ∀wral 3051 ∃wrex 3061 ∃!wreu 3340 ∩ cin 3888 ⟨cop 4573 class class class wbr 5085 ⟶wf 6494 –1-1→wf1 6495 –onto→wfo 6496 –1-1-onto→wf1o 6497 ‘cfv 6498 (class class class)co 7367 Basecbs 17179 Hom chom 17231 compcco 17232 Func cfunc 17821 ∘_func ccofu 17823 Full cful 17871 Faith cfth 17872

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 2708 ax-rep 5212 ax-sep 5231 ax-nul 5241 ax-pow 5307 ax-pr 5375 ax-un 7689

This theorem depends on definitions: df-bi 207 df-an 396 df-or 849 df-3an 1089 df-tru 1545 df-fal 1555 df-ex 1782 df-nf 1786 df-sb 2069 df-mo 2539 df-eu 2569 df-clab 2715 df-cleq 2728 df-clel 2811 df-nfc 2885 df-ne 2933 df-ral 3052 df-rex 3062 df-rmo 3342 df-reu 3343 df-rab 3390 df-v 3431 df-sbc 3729 df-csb 3838 df-dif 3892 df-un 3894 df-in 3896 df-ss 3906 df-nul 4274 df-if 4467 df-pw 4543 df-sn 4568 df-pr 4570 df-op 4574 df-uni 4851 df-iun 4935 df-br 5086 df-opab 5148 df-mpt 5167 df-id 5526 df-xp 5637 df-rel 5638 df-cnv 5639 df-co 5640 df-dm 5641 df-rn 5642 df-res 5643 df-ima 5644 df-iota 6454 df-fun 6500 df-fn 6501 df-f 6502 df-f1 6503 df-fo 6504 df-f1o 6505 df-fv 6506 df-riota 7324 df-ov 7370 df-oprab 7371 df-mpo 7372 df-1st 7942 df-2nd 7943 df-map 8775 df-ixp 8846 df-cat 17634 df-cid 17635 df-func 17825 df-cofu 17827 df-full 17873 df-fth 17874

This theorem is referenced by: uptrlem2 49686 uptrlem3 49687

W3C validator