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 49795

Description: Lemma for uptr 49798. (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 2761	. . . . . 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 2761	. . . . . . . 8 ⊢ (Base‘𝐶) = (Base‘𝐶)
7		uptrlem1.f	. . . . . . . 8 ⊢ (𝜑 → 𝐹(𝐶 Func 𝐷)𝐺)
8	6, 1, 7	funcf1 17882	. . . . . . 7 ⊢ (𝜑 → 𝐹:(Base‘𝐶)⟶(Base‘𝐷))
9		uptrlem1.w	. . . . . . 7 ⊢ (𝜑 → 𝑊 ∈ (Base‘𝐶))
10	8, 9	ffvelcdmd 7062	. . . . . 6 ⊢ (𝜑 → (𝐹‘𝑊) ∈ (Base‘𝐷))
11	1, 2, 3, 4, 5, 10	ffthf1o 17937	. . . . 5 ⊢ (𝜑 → (𝑋𝑁(𝐹‘𝑊)):(𝑋𝐼(𝐹‘𝑊))–1-1-onto→((𝑀‘𝑋)𝐽(𝑀‘(𝐹‘𝑊))))
12		uptrlem1.y	. . . . . . 7 ⊢ (𝜑 → (𝑀‘𝑋) = 𝑌)
13		inss1 4188	. . . . . . . . . . 11 ⊢ ((𝐷 Full 𝐸) ∩ (𝐷 Faith 𝐸)) ⊆ (𝐷 Full 𝐸)
14		fullfunc 17924	. . . . . . . . . . 11 ⊢ (𝐷 Full 𝐸) ⊆ (𝐷 Func 𝐸)
15	13, 14	sstri 3945	. . . . . . . . . 10 ⊢ ((𝐷 Full 𝐸) ∩ (𝐷 Faith 𝐸)) ⊆ (𝐷 Func 𝐸)
16	15	ssbri 5144	. . . . . . . . 9 ⊢ (𝑀((𝐷 Full 𝐸) ∩ (𝐷 Faith 𝐸))𝑁 → 𝑀(𝐷 Func 𝐸)𝑁)
17	4, 16	syl 17	. . . . . . . 8 ⊢ (𝜑 → 𝑀(𝐷 Func 𝐸)𝑁)
18		uptrlem1.k	. . . . . . . 8 ⊢ (𝜑 → (⟨𝑀, 𝑁⟩ ∘_func ⟨𝐹, 𝐺⟩) = ⟨𝐾, 𝐿⟩)
19	6, 7, 17, 18, 9	cofu1a 49679	. . . . . . 7 ⊢ (𝜑 → (𝑀‘(𝐹‘𝑊)) = (𝐾‘𝑊))
20	12, 19	oveq12d 7410	. . . . . 6 ⊢ (𝜑 → ((𝑀‘𝑋)𝐽(𝑀‘(𝐹‘𝑊))) = (𝑌𝐽(𝐾‘𝑊)))
21	20	f1oeq3d 6799	. . . . 5 ⊢ (𝜑 → ((𝑋𝑁(𝐹‘𝑊)):(𝑋𝐼(𝐹‘𝑊))–1-1-onto→((𝑀‘𝑋)𝐽(𝑀‘(𝐹‘𝑊))) ↔ (𝑋𝑁(𝐹‘𝑊)):(𝑋𝐼(𝐹‘𝑊))–1-1-onto→(𝑌𝐽(𝐾‘𝑊))))
22	11, 21	mpbid 234	. . . 4 ⊢ (𝜑 → (𝑋𝑁(𝐹‘𝑊)):(𝑋𝐼(𝐹‘𝑊))–1-1-onto→(𝑌𝐽(𝐾‘𝑊)))
23		f1of 6802	. . . 4 ⊢ ((𝑋𝑁(𝐹‘𝑊)):(𝑋𝐼(𝐹‘𝑊))–1-1-onto→(𝑌𝐽(𝐾‘𝑊)) → (𝑋𝑁(𝐹‘𝑊)):(𝑋𝐼(𝐹‘𝑊))⟶(𝑌𝐽(𝐾‘𝑊)))
24	22, 23	syl 17	. . 3 ⊢ (𝜑 → (𝑋𝑁(𝐹‘𝑊)):(𝑋𝐼(𝐹‘𝑊))⟶(𝑌𝐽(𝐾‘𝑊)))
25	24	ffvelcdmda 7061	. 2 ⊢ ((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) → ((𝑋𝑁(𝐹‘𝑊))‘𝑔) ∈ (𝑌𝐽(𝐾‘𝑊)))
26		f1ofo 6810	. . . 4 ⊢ ((𝑋𝑁(𝐹‘𝑊)):(𝑋𝐼(𝐹‘𝑊))–1-1-onto→(𝑌𝐽(𝐾‘𝑊)) → (𝑋𝑁(𝐹‘𝑊)):(𝑋𝐼(𝐹‘𝑊))–onto→(𝑌𝐽(𝐾‘𝑊)))
27	22, 26	syl 17	. . 3 ⊢ (𝜑 → (𝑋𝑁(𝐹‘𝑊)):(𝑋𝐼(𝐹‘𝑊))–onto→(𝑌𝐽(𝐾‘𝑊)))
28		foelrn 7084	. . 3 ⊢ (((𝑋𝑁(𝐹‘𝑊)):(𝑋𝐼(𝐹‘𝑊))–onto→(𝑌𝐽(𝐾‘𝑊)) ∧ ℎ ∈ (𝑌𝐽(𝐾‘𝑊))) → ∃𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))ℎ = ((𝑋𝑁(𝐹‘𝑊))‘𝑔))
29	27, 28	sylan 589	. 2 ⊢ ((𝜑 ∧ ℎ ∈ (𝑌𝐽(𝐾‘𝑊))) → ∃𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))ℎ = ((𝑋𝑁(𝐹‘𝑊))‘𝑔))
30		simpl3 1206	. . . . 5 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊)) ∧ ℎ = ((𝑋𝑁(𝐹‘𝑊))‘𝑔)) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → ℎ = ((𝑋𝑁(𝐹‘𝑊))‘𝑔))
31	30	eqeq1d 2763	. . . 4 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊)) ∧ ℎ = ((𝑋𝑁(𝐹‘𝑊))‘𝑔)) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → (ℎ = (((𝑍𝐿𝑊)‘𝑘)(⟨𝑌, (𝐾‘𝑍)⟩ ⚬ (𝐾‘𝑊))𝐵) ↔ ((𝑋𝑁(𝐹‘𝑊))‘𝑔) = (((𝑍𝐿𝑊)‘𝑘)(⟨𝑌, (𝐾‘𝑍)⟩ ⚬ (𝐾‘𝑊))𝐵)))
32		uptrlem1.d	. . . . . . . . 9 ⊢ ∙ = (comp‘𝐷)
33		uptrlem1.e	. . . . . . . . 9 ⊢ ⚬ = (comp‘𝐸)
34	17	ad2antrr 736	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → 𝑀(𝐷 Func 𝐸)𝑁)
35	5	ad2antrr 736	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → 𝑋 ∈ (Base‘𝐷))
36		uptrlem1.z	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑍 ∈ (Base‘𝐶))
37	8, 36	ffvelcdmd 7062	. . . . . . . . . 10 ⊢ (𝜑 → (𝐹‘𝑍) ∈ (Base‘𝐷))
38	37	ad2antrr 736	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → (𝐹‘𝑍) ∈ (Base‘𝐷))
39	10	ad2antrr 736	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → (𝐹‘𝑊) ∈ (Base‘𝐷))
40		uptrlem1.a	. . . . . . . . . 10 ⊢ (𝜑 → 𝐴 ∈ (𝑋𝐼(𝐹‘𝑍)))
41	40	ad2antrr 736	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → 𝐴 ∈ (𝑋𝐼(𝐹‘𝑍)))
42		uptrlem1.h	. . . . . . . . . . . 12 ⊢ 𝐻 = (Hom ‘𝐶)
43	6, 42, 2, 7, 36, 9	funcf2 17884	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑍𝐺𝑊):(𝑍𝐻𝑊)⟶((𝐹‘𝑍)𝐼(𝐹‘𝑊)))
44	43	adantr 484	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) → (𝑍𝐺𝑊):(𝑍𝐻𝑊)⟶((𝐹‘𝑍)𝐼(𝐹‘𝑊)))
45	44	ffvelcdmda 7061	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → ((𝑍𝐺𝑊)‘𝑘) ∈ ((𝐹‘𝑍)𝐼(𝐹‘𝑊)))
46	1, 2, 32, 33, 34, 35, 38, 39, 41, 45	funcco 17887	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → ((𝑋𝑁(𝐹‘𝑊))‘(((𝑍𝐺𝑊)‘𝑘)(⟨𝑋, (𝐹‘𝑍)⟩ ∙ (𝐹‘𝑊))𝐴)) = ((((𝐹‘𝑍)𝑁(𝐹‘𝑊))‘((𝑍𝐺𝑊)‘𝑘))(⟨(𝑀‘𝑋), (𝑀‘(𝐹‘𝑍))⟩ ⚬ (𝑀‘(𝐹‘𝑊)))((𝑋𝑁(𝐹‘𝑍))‘𝐴)))
47	12	ad2antrr 736	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → (𝑀‘𝑋) = 𝑌)
48	6, 7, 17, 18, 36	cofu1a 49679	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑀‘(𝐹‘𝑍)) = (𝐾‘𝑍))
49	48	ad2antrr 736	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → (𝑀‘(𝐹‘𝑍)) = (𝐾‘𝑍))
50	47, 49	opeq12d 4838	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → ⟨(𝑀‘𝑋), (𝑀‘(𝐹‘𝑍))⟩ = ⟨𝑌, (𝐾‘𝑍)⟩)
51	19	ad2antrr 736	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → (𝑀‘(𝐹‘𝑊)) = (𝐾‘𝑊))
52	50, 51	oveq12d 7410	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → (⟨(𝑀‘𝑋), (𝑀‘(𝐹‘𝑍))⟩ ⚬ (𝑀‘(𝐹‘𝑊))) = (⟨𝑌, (𝐾‘𝑍)⟩ ⚬ (𝐾‘𝑊)))
53	7	ad2antrr 736	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → 𝐹(𝐶 Func 𝐷)𝐺)
54	18	ad2antrr 736	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → (⟨𝑀, 𝑁⟩ ∘_func ⟨𝐹, 𝐺⟩) = ⟨𝐾, 𝐿⟩)
55	36	ad2antrr 736	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → 𝑍 ∈ (Base‘𝐶))
56	9	ad2antrr 736	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → 𝑊 ∈ (Base‘𝐶))
57		simpr 488	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → 𝑘 ∈ (𝑍𝐻𝑊))
58	6, 53, 34, 54, 55, 56, 42, 57	cofu2a 49680	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → (((𝐹‘𝑍)𝑁(𝐹‘𝑊))‘((𝑍𝐺𝑊)‘𝑘)) = ((𝑍𝐿𝑊)‘𝑘))
59		uptrlem1.b	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑋𝑁(𝐹‘𝑍))‘𝐴) = 𝐵)
60	59	ad2antrr 736	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → ((𝑋𝑁(𝐹‘𝑍))‘𝐴) = 𝐵)
61	52, 58, 60	oveq123d 7413	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → ((((𝐹‘𝑍)𝑁(𝐹‘𝑊))‘((𝑍𝐺𝑊)‘𝑘))(⟨(𝑀‘𝑋), (𝑀‘(𝐹‘𝑍))⟩ ⚬ (𝑀‘(𝐹‘𝑊)))((𝑋𝑁(𝐹‘𝑍))‘𝐴)) = (((𝑍𝐿𝑊)‘𝑘)(⟨𝑌, (𝐾‘𝑍)⟩ ⚬ (𝐾‘𝑊))𝐵))
62	46, 61	eqtrd 2796	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → ((𝑋𝑁(𝐹‘𝑊))‘(((𝑍𝐺𝑊)‘𝑘)(⟨𝑋, (𝐹‘𝑍)⟩ ∙ (𝐹‘𝑊))𝐴)) = (((𝑍𝐿𝑊)‘𝑘)(⟨𝑌, (𝐾‘𝑍)⟩ ⚬ (𝐾‘𝑊))𝐵))
63	62	eqeq2d 2772	. . . . . 6 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → (((𝑋𝑁(𝐹‘𝑊))‘𝑔) = ((𝑋𝑁(𝐹‘𝑊))‘(((𝑍𝐺𝑊)‘𝑘)(⟨𝑋, (𝐹‘𝑍)⟩ ∙ (𝐹‘𝑊))𝐴)) ↔ ((𝑋𝑁(𝐹‘𝑊))‘𝑔) = (((𝑍𝐿𝑊)‘𝑘)(⟨𝑌, (𝐾‘𝑍)⟩ ⚬ (𝐾‘𝑊))𝐵)))
64		f1of1 6801	. . . . . . . . 9 ⊢ ((𝑋𝑁(𝐹‘𝑊)):(𝑋𝐼(𝐹‘𝑊))–1-1-onto→(𝑌𝐽(𝐾‘𝑊)) → (𝑋𝑁(𝐹‘𝑊)):(𝑋𝐼(𝐹‘𝑊))–1-1→(𝑌𝐽(𝐾‘𝑊)))
65	22, 64	syl 17	. . . . . . . 8 ⊢ (𝜑 → (𝑋𝑁(𝐹‘𝑊)):(𝑋𝐼(𝐹‘𝑊))–1-1→(𝑌𝐽(𝐾‘𝑊)))
66	65	ad2antrr 736	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → (𝑋𝑁(𝐹‘𝑊)):(𝑋𝐼(𝐹‘𝑊))–1-1→(𝑌𝐽(𝐾‘𝑊)))
67		simplr 778	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊)))
68	34	funcrcl2 49664	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → 𝐷 ∈ Cat)
69	1, 2, 32, 68, 35, 38, 39, 41, 45	catcocl 17700	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → (((𝑍𝐺𝑊)‘𝑘)(⟨𝑋, (𝐹‘𝑍)⟩ ∙ (𝐹‘𝑊))𝐴) ∈ (𝑋𝐼(𝐹‘𝑊)))
70		f1fveq 7242	. . . . . . 7 ⊢ (((𝑋𝑁(𝐹‘𝑊)):(𝑋𝐼(𝐹‘𝑊))–1-1→(𝑌𝐽(𝐾‘𝑊)) ∧ (𝑔 ∈ (𝑋𝐼(𝐹‘𝑊)) ∧ (((𝑍𝐺𝑊)‘𝑘)(⟨𝑋, (𝐹‘𝑍)⟩ ∙ (𝐹‘𝑊))𝐴) ∈ (𝑋𝐼(𝐹‘𝑊)))) → (((𝑋𝑁(𝐹‘𝑊))‘𝑔) = ((𝑋𝑁(𝐹‘𝑊))‘(((𝑍𝐺𝑊)‘𝑘)(⟨𝑋, (𝐹‘𝑍)⟩ ∙ (𝐹‘𝑊))𝐴)) ↔ 𝑔 = (((𝑍𝐺𝑊)‘𝑘)(⟨𝑋, (𝐹‘𝑍)⟩ ∙ (𝐹‘𝑊))𝐴)))
71	66, 67, 69, 70	syl12anc 847	. . . . . 6 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → (((𝑋𝑁(𝐹‘𝑊))‘𝑔) = ((𝑋𝑁(𝐹‘𝑊))‘(((𝑍𝐺𝑊)‘𝑘)(⟨𝑋, (𝐹‘𝑍)⟩ ∙ (𝐹‘𝑊))𝐴)) ↔ 𝑔 = (((𝑍𝐺𝑊)‘𝑘)(⟨𝑋, (𝐹‘𝑍)⟩ ∙ (𝐹‘𝑊))𝐴)))
72	63, 71	bitr3d 283	. . . . 5 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → (((𝑋𝑁(𝐹‘𝑊))‘𝑔) = (((𝑍𝐿𝑊)‘𝑘)(⟨𝑌, (𝐾‘𝑍)⟩ ⚬ (𝐾‘𝑊))𝐵) ↔ 𝑔 = (((𝑍𝐺𝑊)‘𝑘)(⟨𝑋, (𝐹‘𝑍)⟩ ∙ (𝐹‘𝑊))𝐴)))
73	72	3adantl3 1181	. . . 4 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊)) ∧ ℎ = ((𝑋𝑁(𝐹‘𝑊))‘𝑔)) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → (((𝑋𝑁(𝐹‘𝑊))‘𝑔) = (((𝑍𝐿𝑊)‘𝑘)(⟨𝑌, (𝐾‘𝑍)⟩ ⚬ (𝐾‘𝑊))𝐵) ↔ 𝑔 = (((𝑍𝐺𝑊)‘𝑘)(⟨𝑋, (𝐹‘𝑍)⟩ ∙ (𝐹‘𝑊))𝐴)))
74	31, 73	bitrd 281	. . 3 ⊢ (((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊)) ∧ ℎ = ((𝑋𝑁(𝐹‘𝑊))‘𝑔)) ∧ 𝑘 ∈ (𝑍𝐻𝑊)) → (ℎ = (((𝑍𝐿𝑊)‘𝑘)(⟨𝑌, (𝐾‘𝑍)⟩ ⚬ (𝐾‘𝑊))𝐵) ↔ 𝑔 = (((𝑍𝐺𝑊)‘𝑘)(⟨𝑋, (𝐹‘𝑍)⟩ ∙ (𝐹‘𝑊))𝐴)))
75	74	reubidva 3380	. 2 ⊢ ((𝜑 ∧ 𝑔 ∈ (𝑋𝐼(𝐹‘𝑊)) ∧ ℎ = ((𝑋𝑁(𝐹‘𝑊))‘𝑔)) → (∃!𝑘 ∈ (𝑍𝐻𝑊)ℎ = (((𝑍𝐿𝑊)‘𝑘)(⟨𝑌, (𝐾‘𝑍)⟩ ⚬ (𝐾‘𝑊))𝐵) ↔ ∃!𝑘 ∈ (𝑍𝐻𝑊)𝑔 = (((𝑍𝐺𝑊)‘𝑘)(⟨𝑋, (𝐹‘𝑍)⟩ ∙ (𝐹‘𝑊))𝐴)))
76	25, 29, 75	ralxfrd2 5368	1 ⊢ (𝜑 → (∀ℎ ∈ (𝑌𝐽(𝐾‘𝑊))∃!𝑘 ∈ (𝑍𝐻𝑊)ℎ = (((𝑍𝐿𝑊)‘𝑘)(⟨𝑌, (𝐾‘𝑍)⟩ ⚬ (𝐾‘𝑊))𝐵) ↔ ∀𝑔 ∈ (𝑋𝐼(𝐹‘𝑊))∃!𝑘 ∈ (𝑍𝐻𝑊)𝑔 = (((𝑍𝐺𝑊)‘𝑘)(⟨𝑋, (𝐹‘𝑍)⟩ ∙ (𝐹‘𝑊))𝐴)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 208 ∧ wa 399 ∧ w3a 1097 = wceq 1559 ∈ wcel 2141 ∀wral 3075 ∃wrex 3085 ∃!wreu 3364 ∩ cin 3903 ⟨cop 4587 class class class wbr 5099 ⟶wf 6513 –1-1→wf1 6514 –onto→wfo 6515 –1-1-onto→wf1o 6516 ‘cfv 6517 (class class class)co 7392 Basecbs 17228 Hom chom 17280 compcco 17281 Func cfunc 17870 ∘_func ccofu 17872 Full cful 17920 Faith cfth 17921

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1814 ax-4 1828 ax-5 1929 ax-6 1986 ax-7 2027 ax-8 2143 ax-9 2151 ax-10 2174 ax-11 2190 ax-12 2211 ax-ext 2733 ax-rep 5226 ax-sep 5245 ax-nul 5255 ax-pow 5321 ax-pr 5389 ax-un 7714

This theorem depends on definitions: df-bi 209 df-an 400 df-or 859 df-3an 1099 df-tru 1562 df-fal 1572 df-ex 1799 df-nf 1803 df-sb 2090 df-mo 2565 df-eu 2595 df-clab 2740 df-cleq 2753 df-clel 2836 df-nfc 2910 df-ne 2957 df-ral 3076 df-rex 3086 df-rmo 3366 df-reu 3367 df-rab 3414 df-v 3455 df-sbc 3745 df-csb 3853 df-dif 3907 df-un 3909 df-in 3911 df-ss 3921 df-nul 4286 df-if 4480 df-pw 4556 df-sn 4582 df-pr 4584 df-op 4588 df-uni 4865 df-iun 4950 df-br 5100 df-opab 5162 df-mpt 5181 df-id 5540 df-xp 5651 df-rel 5652 df-cnv 5653 df-co 5654 df-dm 5655 df-rn 5656 df-res 5657 df-ima 5658 df-iota 6473 df-fun 6519 df-fn 6520 df-f 6521 df-f1 6522 df-fo 6523 df-f1o 6524 df-fv 6525 df-riota 7349 df-ov 7395 df-oprab 7396 df-mpo 7397 df-1st 7966 df-2nd 7967 df-map 8805 df-ixp 8876 df-cat 17683 df-cid 17684 df-func 17874 df-cofu 17876 df-full 17922 df-fth 17923

This theorem is referenced by: uptrlem2 49796 uptrlem3 49797

W3C validator