Users' Mathboxes Mathbox for Alexander van der Vekens < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  funcringcsetclem9ALTV Structured version   Visualization version   GIF version

Theorem funcringcsetclem9ALTV 43816
Description: Lemma 9 for funcringcsetcALTV 43817. (Contributed by AV, 15-Feb-2020.) (New usage is discouraged.)
Hypotheses
Ref Expression
funcringcsetcALTV.r 𝑅 = (RingCatALTV‘𝑈)
funcringcsetcALTV.s 𝑆 = (SetCat‘𝑈)
funcringcsetcALTV.b 𝐵 = (Base‘𝑅)
funcringcsetcALTV.c 𝐶 = (Base‘𝑆)
funcringcsetcALTV.u (𝜑𝑈 ∈ WUni)
funcringcsetcALTV.f (𝜑𝐹 = (𝑥𝐵 ↦ (Base‘𝑥)))
funcringcsetcALTV.g (𝜑𝐺 = (𝑥𝐵, 𝑦𝐵 ↦ ( I ↾ (𝑥 RingHom 𝑦))))
Assertion
Ref Expression
funcringcsetclem9ALTV ((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝐻 ∈ (𝑋(Hom ‘𝑅)𝑌) ∧ 𝐾 ∈ (𝑌(Hom ‘𝑅)𝑍))) → ((𝑋𝐺𝑍)‘(𝐾(⟨𝑋, 𝑌⟩(comp‘𝑅)𝑍)𝐻)) = (((𝑌𝐺𝑍)‘𝐾)(⟨(𝐹𝑋), (𝐹𝑌)⟩(comp‘𝑆)(𝐹𝑍))((𝑋𝐺𝑌)‘𝐻)))
Distinct variable groups:   𝑥,𝐵   𝑥,𝑋   𝜑,𝑥   𝑥,𝐶   𝑦,𝐵,𝑥   𝑦,𝑋   𝑥,𝑌,𝑦   𝜑,𝑦   𝑥,𝑍,𝑦
Allowed substitution hints:   𝐶(𝑦)   𝑅(𝑥,𝑦)   𝑆(𝑥,𝑦)   𝑈(𝑥,𝑦)   𝐹(𝑥,𝑦)   𝐺(𝑥,𝑦)   𝐻(𝑥,𝑦)   𝐾(𝑥,𝑦)

Proof of Theorem funcringcsetclem9ALTV
StepHypRef Expression
1 funcringcsetcALTV.r . . . . . 6 𝑅 = (RingCatALTV‘𝑈)
2 funcringcsetcALTV.b . . . . . 6 𝐵 = (Base‘𝑅)
3 funcringcsetcALTV.u . . . . . . 7 (𝜑𝑈 ∈ WUni)
43adantr 481 . . . . . 6 ((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → 𝑈 ∈ WUni)
5 eqid 2795 . . . . . 6 (Hom ‘𝑅) = (Hom ‘𝑅)
6 simpr1 1187 . . . . . 6 ((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → 𝑋𝐵)
7 simpr2 1188 . . . . . 6 ((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → 𝑌𝐵)
81, 2, 4, 5, 6, 7ringchomALTV 43797 . . . . 5 ((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋(Hom ‘𝑅)𝑌) = (𝑋 RingHom 𝑌))
98eleq2d 2868 . . . 4 ((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝐻 ∈ (𝑋(Hom ‘𝑅)𝑌) ↔ 𝐻 ∈ (𝑋 RingHom 𝑌)))
10 simpr3 1189 . . . . . 6 ((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → 𝑍𝐵)
111, 2, 4, 5, 7, 10ringchomALTV 43797 . . . . 5 ((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑌(Hom ‘𝑅)𝑍) = (𝑌 RingHom 𝑍))
1211eleq2d 2868 . . . 4 ((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝐾 ∈ (𝑌(Hom ‘𝑅)𝑍) ↔ 𝐾 ∈ (𝑌 RingHom 𝑍)))
139, 12anbi12d 630 . . 3 ((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((𝐻 ∈ (𝑋(Hom ‘𝑅)𝑌) ∧ 𝐾 ∈ (𝑌(Hom ‘𝑅)𝑍)) ↔ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))))
14 rhmco 19179 . . . . . . . 8 ((𝐾 ∈ (𝑌 RingHom 𝑍) ∧ 𝐻 ∈ (𝑋 RingHom 𝑌)) → (𝐾𝐻) ∈ (𝑋 RingHom 𝑍))
1514ancoms 459 . . . . . . 7 ((𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍)) → (𝐾𝐻) ∈ (𝑋 RingHom 𝑍))
1615adantl 482 . . . . . 6 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → (𝐾𝐻) ∈ (𝑋 RingHom 𝑍))
17 fvresi 6798 . . . . . 6 ((𝐾𝐻) ∈ (𝑋 RingHom 𝑍) → (( I ↾ (𝑋 RingHom 𝑍))‘(𝐾𝐻)) = (𝐾𝐻))
1816, 17syl 17 . . . . 5 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → (( I ↾ (𝑋 RingHom 𝑍))‘(𝐾𝐻)) = (𝐾𝐻))
19 funcringcsetcALTV.s . . . . . . . . 9 𝑆 = (SetCat‘𝑈)
20 funcringcsetcALTV.c . . . . . . . . 9 𝐶 = (Base‘𝑆)
21 funcringcsetcALTV.f . . . . . . . . 9 (𝜑𝐹 = (𝑥𝐵 ↦ (Base‘𝑥)))
22 funcringcsetcALTV.g . . . . . . . . 9 (𝜑𝐺 = (𝑥𝐵, 𝑦𝐵 ↦ ( I ↾ (𝑥 RingHom 𝑦))))
231, 19, 2, 20, 3, 21, 22funcringcsetclem5ALTV 43812 . . . . . . . 8 ((𝜑 ∧ (𝑋𝐵𝑍𝐵)) → (𝑋𝐺𝑍) = ( I ↾ (𝑋 RingHom 𝑍)))
24233adantr2 1163 . . . . . . 7 ((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋𝐺𝑍) = ( I ↾ (𝑋 RingHom 𝑍)))
2524adantr 481 . . . . . 6 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → (𝑋𝐺𝑍) = ( I ↾ (𝑋 RingHom 𝑍)))
264adantr 481 . . . . . . 7 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → 𝑈 ∈ WUni)
27 eqid 2795 . . . . . . 7 (comp‘𝑅) = (comp‘𝑅)
286adantr 481 . . . . . . 7 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → 𝑋𝐵)
297adantr 481 . . . . . . 7 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → 𝑌𝐵)
3010adantr 481 . . . . . . 7 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → 𝑍𝐵)
31 simprl 767 . . . . . . 7 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → 𝐻 ∈ (𝑋 RingHom 𝑌))
32 simprr 769 . . . . . . 7 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → 𝐾 ∈ (𝑌 RingHom 𝑍))
331, 2, 26, 27, 28, 29, 30, 31, 32ringccoALTV 43800 . . . . . 6 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → (𝐾(⟨𝑋, 𝑌⟩(comp‘𝑅)𝑍)𝐻) = (𝐾𝐻))
3425, 33fveq12d 6545 . . . . 5 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → ((𝑋𝐺𝑍)‘(𝐾(⟨𝑋, 𝑌⟩(comp‘𝑅)𝑍)𝐻)) = (( I ↾ (𝑋 RingHom 𝑍))‘(𝐾𝐻)))
35 eqid 2795 . . . . . . 7 (comp‘𝑆) = (comp‘𝑆)
361, 19, 2, 20, 3, 21funcringcsetclem2ALTV 43809 . . . . . . . . 9 ((𝜑𝑋𝐵) → (𝐹𝑋) ∈ 𝑈)
37363ad2antr1 1181 . . . . . . . 8 ((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝐹𝑋) ∈ 𝑈)
3837adantr 481 . . . . . . 7 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → (𝐹𝑋) ∈ 𝑈)
391, 19, 2, 20, 3, 21funcringcsetclem2ALTV 43809 . . . . . . . . 9 ((𝜑𝑌𝐵) → (𝐹𝑌) ∈ 𝑈)
40393ad2antr2 1182 . . . . . . . 8 ((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝐹𝑌) ∈ 𝑈)
4140adantr 481 . . . . . . 7 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → (𝐹𝑌) ∈ 𝑈)
421, 19, 2, 20, 3, 21funcringcsetclem2ALTV 43809 . . . . . . . . 9 ((𝜑𝑍𝐵) → (𝐹𝑍) ∈ 𝑈)
43423ad2antr3 1183 . . . . . . . 8 ((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝐹𝑍) ∈ 𝑈)
4443adantr 481 . . . . . . 7 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → (𝐹𝑍) ∈ 𝑈)
45 eqid 2795 . . . . . . . . . . 11 (Base‘𝑋) = (Base‘𝑋)
46 eqid 2795 . . . . . . . . . . 11 (Base‘𝑌) = (Base‘𝑌)
4745, 46rhmf 19168 . . . . . . . . . 10 (𝐻 ∈ (𝑋 RingHom 𝑌) → 𝐻:(Base‘𝑋)⟶(Base‘𝑌))
4847ad2antrl 724 . . . . . . . . 9 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → 𝐻:(Base‘𝑋)⟶(Base‘𝑌))
491, 19, 2, 20, 3, 21funcringcsetclem1ALTV 43808 . . . . . . . . . . . 12 ((𝜑𝑋𝐵) → (𝐹𝑋) = (Base‘𝑋))
50493ad2antr1 1181 . . . . . . . . . . 11 ((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝐹𝑋) = (Base‘𝑋))
511, 19, 2, 20, 3, 21funcringcsetclem1ALTV 43808 . . . . . . . . . . . 12 ((𝜑𝑌𝐵) → (𝐹𝑌) = (Base‘𝑌))
52513ad2antr2 1182 . . . . . . . . . . 11 ((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝐹𝑌) = (Base‘𝑌))
5350, 52feq23d 6377 . . . . . . . . . 10 ((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝐻:(𝐹𝑋)⟶(𝐹𝑌) ↔ 𝐻:(Base‘𝑋)⟶(Base‘𝑌)))
5453adantr 481 . . . . . . . . 9 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → (𝐻:(𝐹𝑋)⟶(𝐹𝑌) ↔ 𝐻:(Base‘𝑋)⟶(Base‘𝑌)))
5548, 54mpbird 258 . . . . . . . 8 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → 𝐻:(𝐹𝑋)⟶(𝐹𝑌))
56 simpll 763 . . . . . . . . . 10 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → 𝜑)
57 3simpa 1141 . . . . . . . . . . 11 ((𝑋𝐵𝑌𝐵𝑍𝐵) → (𝑋𝐵𝑌𝐵))
5857ad2antlr 723 . . . . . . . . . 10 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → (𝑋𝐵𝑌𝐵))
591, 19, 2, 20, 3, 21, 22funcringcsetclem6ALTV 43813 . . . . . . . . . 10 ((𝜑 ∧ (𝑋𝐵𝑌𝐵) ∧ 𝐻 ∈ (𝑋 RingHom 𝑌)) → ((𝑋𝐺𝑌)‘𝐻) = 𝐻)
6056, 58, 31, 59syl3anc 1364 . . . . . . . . 9 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → ((𝑋𝐺𝑌)‘𝐻) = 𝐻)
6160feq1d 6367 . . . . . . . 8 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → (((𝑋𝐺𝑌)‘𝐻):(𝐹𝑋)⟶(𝐹𝑌) ↔ 𝐻:(𝐹𝑋)⟶(𝐹𝑌)))
6255, 61mpbird 258 . . . . . . 7 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → ((𝑋𝐺𝑌)‘𝐻):(𝐹𝑋)⟶(𝐹𝑌))
63 eqid 2795 . . . . . . . . . . 11 (Base‘𝑍) = (Base‘𝑍)
6446, 63rhmf 19168 . . . . . . . . . 10 (𝐾 ∈ (𝑌 RingHom 𝑍) → 𝐾:(Base‘𝑌)⟶(Base‘𝑍))
6564ad2antll 725 . . . . . . . . 9 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → 𝐾:(Base‘𝑌)⟶(Base‘𝑍))
661, 19, 2, 20, 3, 21funcringcsetclem1ALTV 43808 . . . . . . . . . . . 12 ((𝜑𝑍𝐵) → (𝐹𝑍) = (Base‘𝑍))
67663ad2antr3 1183 . . . . . . . . . . 11 ((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝐹𝑍) = (Base‘𝑍))
6852, 67feq23d 6377 . . . . . . . . . 10 ((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝐾:(𝐹𝑌)⟶(𝐹𝑍) ↔ 𝐾:(Base‘𝑌)⟶(Base‘𝑍)))
6968adantr 481 . . . . . . . . 9 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → (𝐾:(𝐹𝑌)⟶(𝐹𝑍) ↔ 𝐾:(Base‘𝑌)⟶(Base‘𝑍)))
7065, 69mpbird 258 . . . . . . . 8 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → 𝐾:(𝐹𝑌)⟶(𝐹𝑍))
71 3simpc 1143 . . . . . . . . . . 11 ((𝑋𝐵𝑌𝐵𝑍𝐵) → (𝑌𝐵𝑍𝐵))
7271ad2antlr 723 . . . . . . . . . 10 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → (𝑌𝐵𝑍𝐵))
731, 19, 2, 20, 3, 21, 22funcringcsetclem6ALTV 43813 . . . . . . . . . 10 ((𝜑 ∧ (𝑌𝐵𝑍𝐵) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍)) → ((𝑌𝐺𝑍)‘𝐾) = 𝐾)
7456, 72, 32, 73syl3anc 1364 . . . . . . . . 9 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → ((𝑌𝐺𝑍)‘𝐾) = 𝐾)
7574feq1d 6367 . . . . . . . 8 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → (((𝑌𝐺𝑍)‘𝐾):(𝐹𝑌)⟶(𝐹𝑍) ↔ 𝐾:(𝐹𝑌)⟶(𝐹𝑍)))
7670, 75mpbird 258 . . . . . . 7 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → ((𝑌𝐺𝑍)‘𝐾):(𝐹𝑌)⟶(𝐹𝑍))
7719, 26, 35, 38, 41, 44, 62, 76setcco 17172 . . . . . 6 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → (((𝑌𝐺𝑍)‘𝐾)(⟨(𝐹𝑋), (𝐹𝑌)⟩(comp‘𝑆)(𝐹𝑍))((𝑋𝐺𝑌)‘𝐻)) = (((𝑌𝐺𝑍)‘𝐾) ∘ ((𝑋𝐺𝑌)‘𝐻)))
7874, 60coeq12d 5621 . . . . . 6 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → (((𝑌𝐺𝑍)‘𝐾) ∘ ((𝑋𝐺𝑌)‘𝐻)) = (𝐾𝐻))
7977, 78eqtrd 2831 . . . . 5 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → (((𝑌𝐺𝑍)‘𝐾)(⟨(𝐹𝑋), (𝐹𝑌)⟩(comp‘𝑆)(𝐹𝑍))((𝑋𝐺𝑌)‘𝐻)) = (𝐾𝐻))
8018, 34, 793eqtr4d 2841 . . . 4 (((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍))) → ((𝑋𝐺𝑍)‘(𝐾(⟨𝑋, 𝑌⟩(comp‘𝑅)𝑍)𝐻)) = (((𝑌𝐺𝑍)‘𝐾)(⟨(𝐹𝑋), (𝐹𝑌)⟩(comp‘𝑆)(𝐹𝑍))((𝑋𝐺𝑌)‘𝐻)))
8180ex 413 . . 3 ((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((𝐻 ∈ (𝑋 RingHom 𝑌) ∧ 𝐾 ∈ (𝑌 RingHom 𝑍)) → ((𝑋𝐺𝑍)‘(𝐾(⟨𝑋, 𝑌⟩(comp‘𝑅)𝑍)𝐻)) = (((𝑌𝐺𝑍)‘𝐾)(⟨(𝐹𝑋), (𝐹𝑌)⟩(comp‘𝑆)(𝐹𝑍))((𝑋𝐺𝑌)‘𝐻))))
8213, 81sylbid 241 . 2 ((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((𝐻 ∈ (𝑋(Hom ‘𝑅)𝑌) ∧ 𝐾 ∈ (𝑌(Hom ‘𝑅)𝑍)) → ((𝑋𝐺𝑍)‘(𝐾(⟨𝑋, 𝑌⟩(comp‘𝑅)𝑍)𝐻)) = (((𝑌𝐺𝑍)‘𝐾)(⟨(𝐹𝑋), (𝐹𝑌)⟩(comp‘𝑆)(𝐹𝑍))((𝑋𝐺𝑌)‘𝐻))))
83823impia 1110 1 ((𝜑 ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝐻 ∈ (𝑋(Hom ‘𝑅)𝑌) ∧ 𝐾 ∈ (𝑌(Hom ‘𝑅)𝑍))) → ((𝑋𝐺𝑍)‘(𝐾(⟨𝑋, 𝑌⟩(comp‘𝑅)𝑍)𝐻)) = (((𝑌𝐺𝑍)‘𝐾)(⟨(𝐹𝑋), (𝐹𝑌)⟩(comp‘𝑆)(𝐹𝑍))((𝑋𝐺𝑌)‘𝐻)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 207  wa 396  w3a 1080   = wceq 1522  wcel 2081  cop 4478  cmpt 5041   I cid 5347  cres 5445  ccom 5447  wf 6221  cfv 6225  (class class class)co 7016  cmpo 7018  WUnicwun 9968  Basecbs 16312  Hom chom 16405  compcco 16406  SetCatcsetc 17164   RingHom crh 19154  RingCatALTVcringcALTV 43753
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1777  ax-4 1791  ax-5 1888  ax-6 1947  ax-7 1992  ax-8 2083  ax-9 2091  ax-10 2112  ax-11 2126  ax-12 2141  ax-13 2344  ax-ext 2769  ax-rep 5081  ax-sep 5094  ax-nul 5101  ax-pow 5157  ax-pr 5221  ax-un 7319  ax-cnex 10439  ax-resscn 10440  ax-1cn 10441  ax-icn 10442  ax-addcl 10443  ax-addrcl 10444  ax-mulcl 10445  ax-mulrcl 10446  ax-mulcom 10447  ax-addass 10448  ax-mulass 10449  ax-distr 10450  ax-i2m1 10451  ax-1ne0 10452  ax-1rid 10453  ax-rnegex 10454  ax-rrecex 10455  ax-cnre 10456  ax-pre-lttri 10457  ax-pre-lttrn 10458  ax-pre-ltadd 10459  ax-pre-mulgt0 10460
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 843  df-3or 1081  df-3an 1082  df-tru 1525  df-ex 1762  df-nf 1766  df-sb 2043  df-mo 2576  df-eu 2612  df-clab 2776  df-cleq 2788  df-clel 2863  df-nfc 2935  df-ne 2985  df-nel 3091  df-ral 3110  df-rex 3111  df-reu 3112  df-rmo 3113  df-rab 3114  df-v 3439  df-sbc 3707  df-csb 3812  df-dif 3862  df-un 3864  df-in 3866  df-ss 3874  df-pss 3876  df-nul 4212  df-if 4382  df-pw 4455  df-sn 4473  df-pr 4475  df-tp 4477  df-op 4479  df-uni 4746  df-int 4783  df-iun 4827  df-br 4963  df-opab 5025  df-mpt 5042  df-tr 5064  df-id 5348  df-eprel 5353  df-po 5362  df-so 5363  df-fr 5402  df-we 5404  df-xp 5449  df-rel 5450  df-cnv 5451  df-co 5452  df-dm 5453  df-rn 5454  df-res 5455  df-ima 5456  df-pred 6023  df-ord 6069  df-on 6070  df-lim 6071  df-suc 6072  df-iota 6189  df-fun 6227  df-fn 6228  df-f 6229  df-f1 6230  df-fo 6231  df-f1o 6232  df-fv 6233  df-riota 6977  df-ov 7019  df-oprab 7020  df-mpo 7021  df-om 7437  df-1st 7545  df-2nd 7546  df-wrecs 7798  df-recs 7860  df-rdg 7898  df-1o 7953  df-oadd 7957  df-er 8139  df-map 8258  df-en 8358  df-dom 8359  df-sdom 8360  df-fin 8361  df-wun 9970  df-pnf 10523  df-mnf 10524  df-xr 10525  df-ltxr 10526  df-le 10527  df-sub 10719  df-neg 10720  df-nn 11487  df-2 11548  df-3 11549  df-4 11550  df-5 11551  df-6 11552  df-7 11553  df-8 11554  df-9 11555  df-n0 11746  df-z 11830  df-dec 11948  df-uz 12094  df-fz 12743  df-struct 16314  df-ndx 16315  df-slot 16316  df-base 16318  df-sets 16319  df-plusg 16407  df-hom 16418  df-cco 16419  df-0g 16544  df-setc 17165  df-mgm 17681  df-sgrp 17723  df-mnd 17734  df-mhm 17774  df-grp 17864  df-ghm 18097  df-mgp 18930  df-ur 18942  df-ring 18989  df-rnghom 19157  df-ringcALTV 43755
This theorem is referenced by:  funcringcsetcALTV  43817
  Copyright terms: Public domain W3C validator