MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  rhmsubcrngclem2 Structured version   Visualization version   GIF version

Theorem rhmsubcrngclem2 20617
Description: Lemma 2 for rhmsubcrngc 20618. (Contributed by AV, 12-Mar-2020.)
Hypotheses
Ref Expression
rhmsubcrngc.c 𝐶 = (RngCat‘𝑈)
rhmsubcrngc.u (𝜑𝑈𝑉)
rhmsubcrngc.b (𝜑𝐵 = (Ring ∩ 𝑈))
rhmsubcrngc.h (𝜑𝐻 = ( RingHom ↾ (𝐵 × 𝐵)))
Assertion
Ref Expression
rhmsubcrngclem2 ((𝜑𝑥𝐵) → ∀𝑦𝐵𝑧𝐵𝑓 ∈ (𝑥𝐻𝑦)∀𝑔 ∈ (𝑦𝐻𝑧)(𝑔(⟨𝑥, 𝑦⟩(comp‘𝐶)𝑧)𝑓) ∈ (𝑥𝐻𝑧))
Distinct variable groups:   𝐵,𝑓,𝑔,𝑥,𝑦,𝑧   𝐶,𝑓,𝑔,𝑥,𝑦,𝑧   𝑓,𝐻,𝑔,𝑥,𝑦,𝑧   𝑥,𝑈,𝑦   𝜑,𝑓,𝑔,𝑥,𝑦,𝑧
Allowed substitution hints:   𝑈(𝑧,𝑓,𝑔)   𝑉(𝑥,𝑦,𝑧,𝑓,𝑔)

Proof of Theorem rhmsubcrngclem2
StepHypRef Expression
1 simpl 482 . . . . . . 7 ((𝜑𝑥𝐵) → 𝜑)
21ad2antrr 727 . . . . . 6 ((((𝜑𝑥𝐵) ∧ (𝑦𝐵𝑧𝐵)) ∧ (𝑓 ∈ (𝑥𝐻𝑦) ∧ 𝑔 ∈ (𝑦𝐻𝑧))) → 𝜑)
3 simpr 484 . . . . . . 7 (((𝜑𝑥𝐵) ∧ (𝑦𝐵𝑧𝐵)) → (𝑦𝐵𝑧𝐵))
43adantr 480 . . . . . 6 ((((𝜑𝑥𝐵) ∧ (𝑦𝐵𝑧𝐵)) ∧ (𝑓 ∈ (𝑥𝐻𝑦) ∧ 𝑔 ∈ (𝑦𝐻𝑧))) → (𝑦𝐵𝑧𝐵))
5 simprr 773 . . . . . 6 ((((𝜑𝑥𝐵) ∧ (𝑦𝐵𝑧𝐵)) ∧ (𝑓 ∈ (𝑥𝐻𝑦) ∧ 𝑔 ∈ (𝑦𝐻𝑧))) → 𝑔 ∈ (𝑦𝐻𝑧))
6 rhmsubcrngc.h . . . . . . 7 (𝜑𝐻 = ( RingHom ↾ (𝐵 × 𝐵)))
76rhmresel 20599 . . . . . 6 ((𝜑 ∧ (𝑦𝐵𝑧𝐵) ∧ 𝑔 ∈ (𝑦𝐻𝑧)) → 𝑔 ∈ (𝑦 RingHom 𝑧))
82, 4, 5, 7syl3anc 1374 . . . . 5 ((((𝜑𝑥𝐵) ∧ (𝑦𝐵𝑧𝐵)) ∧ (𝑓 ∈ (𝑥𝐻𝑦) ∧ 𝑔 ∈ (𝑦𝐻𝑧))) → 𝑔 ∈ (𝑦 RingHom 𝑧))
9 simpr 484 . . . . . . . 8 ((𝜑𝑥𝐵) → 𝑥𝐵)
10 simpl 482 . . . . . . . 8 ((𝑦𝐵𝑧𝐵) → 𝑦𝐵)
119, 10anim12i 614 . . . . . . 7 (((𝜑𝑥𝐵) ∧ (𝑦𝐵𝑧𝐵)) → (𝑥𝐵𝑦𝐵))
1211adantr 480 . . . . . 6 ((((𝜑𝑥𝐵) ∧ (𝑦𝐵𝑧𝐵)) ∧ (𝑓 ∈ (𝑥𝐻𝑦) ∧ 𝑔 ∈ (𝑦𝐻𝑧))) → (𝑥𝐵𝑦𝐵))
13 simprl 771 . . . . . 6 ((((𝜑𝑥𝐵) ∧ (𝑦𝐵𝑧𝐵)) ∧ (𝑓 ∈ (𝑥𝐻𝑦) ∧ 𝑔 ∈ (𝑦𝐻𝑧))) → 𝑓 ∈ (𝑥𝐻𝑦))
146rhmresel 20599 . . . . . 6 ((𝜑 ∧ (𝑥𝐵𝑦𝐵) ∧ 𝑓 ∈ (𝑥𝐻𝑦)) → 𝑓 ∈ (𝑥 RingHom 𝑦))
152, 12, 13, 14syl3anc 1374 . . . . 5 ((((𝜑𝑥𝐵) ∧ (𝑦𝐵𝑧𝐵)) ∧ (𝑓 ∈ (𝑥𝐻𝑦) ∧ 𝑔 ∈ (𝑦𝐻𝑧))) → 𝑓 ∈ (𝑥 RingHom 𝑦))
16 rhmco 20451 . . . . 5 ((𝑔 ∈ (𝑦 RingHom 𝑧) ∧ 𝑓 ∈ (𝑥 RingHom 𝑦)) → (𝑔𝑓) ∈ (𝑥 RingHom 𝑧))
178, 15, 16syl2anc 585 . . . 4 ((((𝜑𝑥𝐵) ∧ (𝑦𝐵𝑧𝐵)) ∧ (𝑓 ∈ (𝑥𝐻𝑦) ∧ 𝑔 ∈ (𝑦𝐻𝑧))) → (𝑔𝑓) ∈ (𝑥 RingHom 𝑧))
18 rhmsubcrngc.c . . . . 5 𝐶 = (RngCat‘𝑈)
19 rhmsubcrngc.u . . . . . . 7 (𝜑𝑈𝑉)
2019adantr 480 . . . . . 6 ((𝜑𝑥𝐵) → 𝑈𝑉)
2120ad2antrr 727 . . . . 5 ((((𝜑𝑥𝐵) ∧ (𝑦𝐵𝑧𝐵)) ∧ (𝑓 ∈ (𝑥𝐻𝑦) ∧ 𝑔 ∈ (𝑦𝐻𝑧))) → 𝑈𝑉)
22 eqid 2737 . . . . 5 (comp‘𝐶) = (comp‘𝐶)
23 rhmsubcrngc.b . . . . . . . . 9 (𝜑𝐵 = (Ring ∩ 𝑈))
2423eleq2d 2823 . . . . . . . 8 (𝜑 → (𝑥𝐵𝑥 ∈ (Ring ∩ 𝑈)))
25 elinel2 4156 . . . . . . . 8 (𝑥 ∈ (Ring ∩ 𝑈) → 𝑥𝑈)
2624, 25biimtrdi 253 . . . . . . 7 (𝜑 → (𝑥𝐵𝑥𝑈))
2726imp 406 . . . . . 6 ((𝜑𝑥𝐵) → 𝑥𝑈)
2827ad2antrr 727 . . . . 5 ((((𝜑𝑥𝐵) ∧ (𝑦𝐵𝑧𝐵)) ∧ (𝑓 ∈ (𝑥𝐻𝑦) ∧ 𝑔 ∈ (𝑦𝐻𝑧))) → 𝑥𝑈)
2923eleq2d 2823 . . . . . . . . . . 11 (𝜑 → (𝑦𝐵𝑦 ∈ (Ring ∩ 𝑈)))
30 elinel2 4156 . . . . . . . . . . 11 (𝑦 ∈ (Ring ∩ 𝑈) → 𝑦𝑈)
3129, 30biimtrdi 253 . . . . . . . . . 10 (𝜑 → (𝑦𝐵𝑦𝑈))
3231adantr 480 . . . . . . . . 9 ((𝜑𝑥𝐵) → (𝑦𝐵𝑦𝑈))
3332com12 32 . . . . . . . 8 (𝑦𝐵 → ((𝜑𝑥𝐵) → 𝑦𝑈))
3433adantr 480 . . . . . . 7 ((𝑦𝐵𝑧𝐵) → ((𝜑𝑥𝐵) → 𝑦𝑈))
3534impcom 407 . . . . . 6 (((𝜑𝑥𝐵) ∧ (𝑦𝐵𝑧𝐵)) → 𝑦𝑈)
3635adantr 480 . . . . 5 ((((𝜑𝑥𝐵) ∧ (𝑦𝐵𝑧𝐵)) ∧ (𝑓 ∈ (𝑥𝐻𝑦) ∧ 𝑔 ∈ (𝑦𝐻𝑧))) → 𝑦𝑈)
3723eleq2d 2823 . . . . . . . . . 10 (𝜑 → (𝑧𝐵𝑧 ∈ (Ring ∩ 𝑈)))
38 elinel2 4156 . . . . . . . . . 10 (𝑧 ∈ (Ring ∩ 𝑈) → 𝑧𝑈)
3937, 38biimtrdi 253 . . . . . . . . 9 (𝜑 → (𝑧𝐵𝑧𝑈))
4039adantr 480 . . . . . . . 8 ((𝜑𝑥𝐵) → (𝑧𝐵𝑧𝑈))
4140adantld 490 . . . . . . 7 ((𝜑𝑥𝐵) → ((𝑦𝐵𝑧𝐵) → 𝑧𝑈))
4241imp 406 . . . . . 6 (((𝜑𝑥𝐵) ∧ (𝑦𝐵𝑧𝐵)) → 𝑧𝑈)
4342adantr 480 . . . . 5 ((((𝜑𝑥𝐵) ∧ (𝑦𝐵𝑧𝐵)) ∧ (𝑓 ∈ (𝑥𝐻𝑦) ∧ 𝑔 ∈ (𝑦𝐻𝑧))) → 𝑧𝑈)
44 simprl 771 . . . . . . . . . . . . . 14 ((𝑦𝐵 ∧ (𝜑𝑥𝐵)) → 𝜑)
4544adantr 480 . . . . . . . . . . . . 13 (((𝑦𝐵 ∧ (𝜑𝑥𝐵)) ∧ 𝑓 ∈ (𝑥𝐻𝑦)) → 𝜑)
469anim1i 616 . . . . . . . . . . . . . . 15 (((𝜑𝑥𝐵) ∧ 𝑦𝐵) → (𝑥𝐵𝑦𝐵))
4746ancoms 458 . . . . . . . . . . . . . 14 ((𝑦𝐵 ∧ (𝜑𝑥𝐵)) → (𝑥𝐵𝑦𝐵))
4847adantr 480 . . . . . . . . . . . . 13 (((𝑦𝐵 ∧ (𝜑𝑥𝐵)) ∧ 𝑓 ∈ (𝑥𝐻𝑦)) → (𝑥𝐵𝑦𝐵))
49 simpr 484 . . . . . . . . . . . . 13 (((𝑦𝐵 ∧ (𝜑𝑥𝐵)) ∧ 𝑓 ∈ (𝑥𝐻𝑦)) → 𝑓 ∈ (𝑥𝐻𝑦))
5045, 48, 49, 14syl3anc 1374 . . . . . . . . . . . 12 (((𝑦𝐵 ∧ (𝜑𝑥𝐵)) ∧ 𝑓 ∈ (𝑥𝐻𝑦)) → 𝑓 ∈ (𝑥 RingHom 𝑦))
51 eqid 2737 . . . . . . . . . . . . 13 (Base‘𝑥) = (Base‘𝑥)
52 eqid 2737 . . . . . . . . . . . . 13 (Base‘𝑦) = (Base‘𝑦)
5351, 52rhmf 20437 . . . . . . . . . . . 12 (𝑓 ∈ (𝑥 RingHom 𝑦) → 𝑓:(Base‘𝑥)⟶(Base‘𝑦))
5450, 53syl 17 . . . . . . . . . . 11 (((𝑦𝐵 ∧ (𝜑𝑥𝐵)) ∧ 𝑓 ∈ (𝑥𝐻𝑦)) → 𝑓:(Base‘𝑥)⟶(Base‘𝑦))
5554exp31 419 . . . . . . . . . 10 (𝑦𝐵 → ((𝜑𝑥𝐵) → (𝑓 ∈ (𝑥𝐻𝑦) → 𝑓:(Base‘𝑥)⟶(Base‘𝑦))))
5655adantr 480 . . . . . . . . 9 ((𝑦𝐵𝑧𝐵) → ((𝜑𝑥𝐵) → (𝑓 ∈ (𝑥𝐻𝑦) → 𝑓:(Base‘𝑥)⟶(Base‘𝑦))))
5756impcom 407 . . . . . . . 8 (((𝜑𝑥𝐵) ∧ (𝑦𝐵𝑧𝐵)) → (𝑓 ∈ (𝑥𝐻𝑦) → 𝑓:(Base‘𝑥)⟶(Base‘𝑦)))
5857com12 32 . . . . . . 7 (𝑓 ∈ (𝑥𝐻𝑦) → (((𝜑𝑥𝐵) ∧ (𝑦𝐵𝑧𝐵)) → 𝑓:(Base‘𝑥)⟶(Base‘𝑦)))
5958adantr 480 . . . . . 6 ((𝑓 ∈ (𝑥𝐻𝑦) ∧ 𝑔 ∈ (𝑦𝐻𝑧)) → (((𝜑𝑥𝐵) ∧ (𝑦𝐵𝑧𝐵)) → 𝑓:(Base‘𝑥)⟶(Base‘𝑦)))
6059impcom 407 . . . . 5 ((((𝜑𝑥𝐵) ∧ (𝑦𝐵𝑧𝐵)) ∧ (𝑓 ∈ (𝑥𝐻𝑦) ∧ 𝑔 ∈ (𝑦𝐻𝑧))) → 𝑓:(Base‘𝑥)⟶(Base‘𝑦))
6173expa 1119 . . . . . . . . . 10 (((𝜑 ∧ (𝑦𝐵𝑧𝐵)) ∧ 𝑔 ∈ (𝑦𝐻𝑧)) → 𝑔 ∈ (𝑦 RingHom 𝑧))
62 eqid 2737 . . . . . . . . . . 11 (Base‘𝑧) = (Base‘𝑧)
6352, 62rhmf 20437 . . . . . . . . . 10 (𝑔 ∈ (𝑦 RingHom 𝑧) → 𝑔:(Base‘𝑦)⟶(Base‘𝑧))
6461, 63syl 17 . . . . . . . . 9 (((𝜑 ∧ (𝑦𝐵𝑧𝐵)) ∧ 𝑔 ∈ (𝑦𝐻𝑧)) → 𝑔:(Base‘𝑦)⟶(Base‘𝑧))
6564ex 412 . . . . . . . 8 ((𝜑 ∧ (𝑦𝐵𝑧𝐵)) → (𝑔 ∈ (𝑦𝐻𝑧) → 𝑔:(Base‘𝑦)⟶(Base‘𝑧)))
6665adantlr 716 . . . . . . 7 (((𝜑𝑥𝐵) ∧ (𝑦𝐵𝑧𝐵)) → (𝑔 ∈ (𝑦𝐻𝑧) → 𝑔:(Base‘𝑦)⟶(Base‘𝑧)))
6766adantld 490 . . . . . 6 (((𝜑𝑥𝐵) ∧ (𝑦𝐵𝑧𝐵)) → ((𝑓 ∈ (𝑥𝐻𝑦) ∧ 𝑔 ∈ (𝑦𝐻𝑧)) → 𝑔:(Base‘𝑦)⟶(Base‘𝑧)))
6867imp 406 . . . . 5 ((((𝜑𝑥𝐵) ∧ (𝑦𝐵𝑧𝐵)) ∧ (𝑓 ∈ (𝑥𝐻𝑦) ∧ 𝑔 ∈ (𝑦𝐻𝑧))) → 𝑔:(Base‘𝑦)⟶(Base‘𝑧))
6918, 21, 22, 28, 36, 43, 60, 68rngcco 20577 . . . 4 ((((𝜑𝑥𝐵) ∧ (𝑦𝐵𝑧𝐵)) ∧ (𝑓 ∈ (𝑥𝐻𝑦) ∧ 𝑔 ∈ (𝑦𝐻𝑧))) → (𝑔(⟨𝑥, 𝑦⟩(comp‘𝐶)𝑧)𝑓) = (𝑔𝑓))
706adantr 480 . . . . . . 7 ((𝜑𝑥𝐵) → 𝐻 = ( RingHom ↾ (𝐵 × 𝐵)))
7170oveqdr 7398 . . . . . 6 (((𝜑𝑥𝐵) ∧ (𝑦𝐵𝑧𝐵)) → (𝑥𝐻𝑧) = (𝑥( RingHom ↾ (𝐵 × 𝐵))𝑧))
72 ovres 7536 . . . . . . 7 ((𝑥𝐵𝑧𝐵) → (𝑥( RingHom ↾ (𝐵 × 𝐵))𝑧) = (𝑥 RingHom 𝑧))
7372ad2ant2l 747 . . . . . 6 (((𝜑𝑥𝐵) ∧ (𝑦𝐵𝑧𝐵)) → (𝑥( RingHom ↾ (𝐵 × 𝐵))𝑧) = (𝑥 RingHom 𝑧))
7471, 73eqtrd 2772 . . . . 5 (((𝜑𝑥𝐵) ∧ (𝑦𝐵𝑧𝐵)) → (𝑥𝐻𝑧) = (𝑥 RingHom 𝑧))
7574adantr 480 . . . 4 ((((𝜑𝑥𝐵) ∧ (𝑦𝐵𝑧𝐵)) ∧ (𝑓 ∈ (𝑥𝐻𝑦) ∧ 𝑔 ∈ (𝑦𝐻𝑧))) → (𝑥𝐻𝑧) = (𝑥 RingHom 𝑧))
7617, 69, 753eltr4d 2852 . . 3 ((((𝜑𝑥𝐵) ∧ (𝑦𝐵𝑧𝐵)) ∧ (𝑓 ∈ (𝑥𝐻𝑦) ∧ 𝑔 ∈ (𝑦𝐻𝑧))) → (𝑔(⟨𝑥, 𝑦⟩(comp‘𝐶)𝑧)𝑓) ∈ (𝑥𝐻𝑧))
7776ralrimivva 3181 . 2 (((𝜑𝑥𝐵) ∧ (𝑦𝐵𝑧𝐵)) → ∀𝑓 ∈ (𝑥𝐻𝑦)∀𝑔 ∈ (𝑦𝐻𝑧)(𝑔(⟨𝑥, 𝑦⟩(comp‘𝐶)𝑧)𝑓) ∈ (𝑥𝐻𝑧))
7877ralrimivva 3181 1 ((𝜑𝑥𝐵) → ∀𝑦𝐵𝑧𝐵𝑓 ∈ (𝑥𝐻𝑦)∀𝑔 ∈ (𝑦𝐻𝑧)(𝑔(⟨𝑥, 𝑦⟩(comp‘𝐶)𝑧)𝑓) ∈ (𝑥𝐻𝑧))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 395   = wceq 1542  wcel 2114  wral 3052  cin 3902  cop 4588   × cxp 5632  cres 5636  ccom 5638  wf 6498  cfv 6502  (class class class)co 7370  Basecbs 17150  compcco 17203  Ringcrg 20185   RingHom crh 20422  RngCatcrngc 20566
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 2709  ax-rep 5226  ax-sep 5245  ax-nul 5255  ax-pow 5314  ax-pr 5381  ax-un 7692  ax-cnex 11096  ax-resscn 11097  ax-1cn 11098  ax-icn 11099  ax-addcl 11100  ax-addrcl 11101  ax-mulcl 11102  ax-mulrcl 11103  ax-mulcom 11104  ax-addass 11105  ax-mulass 11106  ax-distr 11107  ax-i2m1 11108  ax-1ne0 11109  ax-1rid 11110  ax-rnegex 11111  ax-rrecex 11112  ax-cnre 11113  ax-pre-lttri 11114  ax-pre-lttrn 11115  ax-pre-ltadd 11116  ax-pre-mulgt0 11117
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3063  df-rmo 3352  df-reu 3353  df-rab 3402  df-v 3444  df-sbc 3743  df-csb 3852  df-dif 3906  df-un 3908  df-in 3910  df-ss 3920  df-pss 3923  df-nul 4288  df-if 4482  df-pw 4558  df-sn 4583  df-pr 4585  df-tp 4587  df-op 4589  df-uni 4866  df-iun 4950  df-br 5101  df-opab 5163  df-mpt 5182  df-tr 5208  df-id 5529  df-eprel 5534  df-po 5542  df-so 5543  df-fr 5587  df-we 5589  df-xp 5640  df-rel 5641  df-cnv 5642  df-co 5643  df-dm 5644  df-rn 5645  df-res 5646  df-ima 5647  df-pred 6269  df-ord 6330  df-on 6331  df-lim 6332  df-suc 6333  df-iota 6458  df-fun 6504  df-fn 6505  df-f 6506  df-f1 6507  df-fo 6508  df-f1o 6509  df-fv 6510  df-riota 7327  df-ov 7373  df-oprab 7374  df-mpo 7375  df-om 7821  df-1st 7945  df-2nd 7946  df-frecs 8235  df-wrecs 8266  df-recs 8315  df-rdg 8353  df-1o 8409  df-er 8647  df-map 8779  df-en 8898  df-dom 8899  df-sdom 8900  df-fin 8901  df-pnf 11182  df-mnf 11183  df-xr 11184  df-ltxr 11185  df-le 11186  df-sub 11380  df-neg 11381  df-nn 12160  df-2 12222  df-3 12223  df-4 12224  df-5 12225  df-6 12226  df-7 12227  df-8 12228  df-9 12229  df-n0 12416  df-z 12503  df-dec 12622  df-uz 12766  df-fz 13438  df-struct 17088  df-sets 17105  df-slot 17123  df-ndx 17135  df-base 17151  df-ress 17172  df-plusg 17204  df-hom 17215  df-cco 17216  df-0g 17375  df-resc 17749  df-estrc 18060  df-mgm 18579  df-sgrp 18658  df-mnd 18674  df-mhm 18722  df-grp 18883  df-ghm 19159  df-mgp 20093  df-ur 20134  df-ring 20187  df-rnghm 20389  df-rhm 20425  df-rngc 20567
This theorem is referenced by:  rhmsubcrngc  20618
  Copyright terms: Public domain W3C validator