Users' Mathboxes Mathbox for Thierry Arnoux < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  erlbrd Structured version   Visualization version   GIF version

Theorem erlbrd 33273
Description: Deduce the ring localization equivalence relation. If for some 𝑇𝑆 we have 𝑇 · (𝐸 · 𝐻𝐹 · 𝐺) = 0, then pairs 𝐸, 𝐺 and 𝐹, 𝐻 are equivalent under the localization relation. (Contributed by Thierry Arnoux, 4-May-2025.)
Hypotheses
Ref Expression
erlcl1.b 𝐵 = (Base‘𝑅)
erlcl1.e = (𝑅 ~RL 𝑆)
erlcl1.s (𝜑𝑆𝐵)
erldi.1 0 = (0g𝑅)
erldi.2 · = (.r𝑅)
erldi.3 = (-g𝑅)
erlbrd.u (𝜑𝑈 = ⟨𝐸, 𝐺⟩)
erlbrd.v (𝜑𝑉 = ⟨𝐹, 𝐻⟩)
erlbrd.e (𝜑𝐸𝐵)
erlbrd.f (𝜑𝐹𝐵)
erlbrd.g (𝜑𝐺𝑆)
erlbrd.h (𝜑𝐻𝑆)
erlbrd.1 (𝜑𝑇𝑆)
erlbrd.2 (𝜑 → (𝑇 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = 0 )
Assertion
Ref Expression
erlbrd (𝜑𝑈 𝑉)

Proof of Theorem erlbrd
Dummy variables 𝑎 𝑏 𝑡 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 erlbrd.u . . . . 5 (𝜑𝑈 = ⟨𝐸, 𝐺⟩)
2 erlbrd.e . . . . . 6 (𝜑𝐸𝐵)
3 erlbrd.g . . . . . 6 (𝜑𝐺𝑆)
42, 3opelxpd 5660 . . . . 5 (𝜑 → ⟨𝐸, 𝐺⟩ ∈ (𝐵 × 𝑆))
51, 4eqeltrd 2833 . . . 4 (𝜑𝑈 ∈ (𝐵 × 𝑆))
6 erlbrd.v . . . . 5 (𝜑𝑉 = ⟨𝐹, 𝐻⟩)
7 erlbrd.f . . . . . 6 (𝜑𝐹𝐵)
8 erlbrd.h . . . . . 6 (𝜑𝐻𝑆)
97, 8opelxpd 5660 . . . . 5 (𝜑 → ⟨𝐹, 𝐻⟩ ∈ (𝐵 × 𝑆))
106, 9eqeltrd 2833 . . . 4 (𝜑𝑉 ∈ (𝐵 × 𝑆))
115, 10jca 511 . . 3 (𝜑 → (𝑈 ∈ (𝐵 × 𝑆) ∧ 𝑉 ∈ (𝐵 × 𝑆)))
12 erlbrd.1 . . . 4 (𝜑𝑇𝑆)
13 simpr 484 . . . . . 6 ((𝜑𝑡 = 𝑇) → 𝑡 = 𝑇)
1413oveq1d 7370 . . . . 5 ((𝜑𝑡 = 𝑇) → (𝑡 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = (𝑇 · ((𝐸 · 𝐻) (𝐹 · 𝐺))))
1514eqeq1d 2735 . . . 4 ((𝜑𝑡 = 𝑇) → ((𝑡 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = 0 ↔ (𝑇 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = 0 ))
16 erlbrd.2 . . . 4 (𝜑 → (𝑇 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = 0 )
1712, 15, 16rspcedvd 3575 . . 3 (𝜑 → ∃𝑡𝑆 (𝑡 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = 0 )
1811, 17jca 511 . 2 (𝜑 → ((𝑈 ∈ (𝐵 × 𝑆) ∧ 𝑉 ∈ (𝐵 × 𝑆)) ∧ ∃𝑡𝑆 (𝑡 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = 0 ))
19 erlcl1.e . . . 4 = (𝑅 ~RL 𝑆)
20 erlcl1.b . . . . 5 𝐵 = (Base‘𝑅)
21 erldi.1 . . . . 5 0 = (0g𝑅)
22 erldi.2 . . . . 5 · = (.r𝑅)
23 erldi.3 . . . . 5 = (-g𝑅)
24 eqid 2733 . . . . 5 (𝐵 × 𝑆) = (𝐵 × 𝑆)
25 eqid 2733 . . . . 5 {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝐵 × 𝑆) ∧ 𝑏 ∈ (𝐵 × 𝑆)) ∧ ∃𝑡𝑆 (𝑡 · (((1st𝑎) · (2nd𝑏)) ((1st𝑏) · (2nd𝑎)))) = 0 )} = {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝐵 × 𝑆) ∧ 𝑏 ∈ (𝐵 × 𝑆)) ∧ ∃𝑡𝑆 (𝑡 · (((1st𝑎) · (2nd𝑏)) ((1st𝑏) · (2nd𝑎)))) = 0 )}
26 erlcl1.s . . . . 5 (𝜑𝑆𝐵)
2720, 21, 22, 23, 24, 25, 26erlval 33268 . . . 4 (𝜑 → (𝑅 ~RL 𝑆) = {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝐵 × 𝑆) ∧ 𝑏 ∈ (𝐵 × 𝑆)) ∧ ∃𝑡𝑆 (𝑡 · (((1st𝑎) · (2nd𝑏)) ((1st𝑏) · (2nd𝑎)))) = 0 )})
2819, 27eqtrid 2780 . . 3 (𝜑 = {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝐵 × 𝑆) ∧ 𝑏 ∈ (𝐵 × 𝑆)) ∧ ∃𝑡𝑆 (𝑡 · (((1st𝑎) · (2nd𝑏)) ((1st𝑏) · (2nd𝑎)))) = 0 )})
29 simprl 770 . . . . . . . . . 10 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → 𝑎 = 𝑈)
3029fveq2d 6835 . . . . . . . . 9 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (1st𝑎) = (1st𝑈))
311fveq2d 6835 . . . . . . . . . . 11 (𝜑 → (1st𝑈) = (1st ‘⟨𝐸, 𝐺⟩))
32 op1stg 7942 . . . . . . . . . . . 12 ((𝐸𝐵𝐺𝑆) → (1st ‘⟨𝐸, 𝐺⟩) = 𝐸)
332, 3, 32syl2anc 584 . . . . . . . . . . 11 (𝜑 → (1st ‘⟨𝐸, 𝐺⟩) = 𝐸)
3431, 33eqtrd 2768 . . . . . . . . . 10 (𝜑 → (1st𝑈) = 𝐸)
3534adantr 480 . . . . . . . . 9 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (1st𝑈) = 𝐸)
3630, 35eqtrd 2768 . . . . . . . 8 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (1st𝑎) = 𝐸)
37 simprr 772 . . . . . . . . . 10 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → 𝑏 = 𝑉)
3837fveq2d 6835 . . . . . . . . 9 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (2nd𝑏) = (2nd𝑉))
396fveq2d 6835 . . . . . . . . . . 11 (𝜑 → (2nd𝑉) = (2nd ‘⟨𝐹, 𝐻⟩))
40 op2ndg 7943 . . . . . . . . . . . 12 ((𝐹𝐵𝐻𝑆) → (2nd ‘⟨𝐹, 𝐻⟩) = 𝐻)
417, 8, 40syl2anc 584 . . . . . . . . . . 11 (𝜑 → (2nd ‘⟨𝐹, 𝐻⟩) = 𝐻)
4239, 41eqtrd 2768 . . . . . . . . . 10 (𝜑 → (2nd𝑉) = 𝐻)
4342adantr 480 . . . . . . . . 9 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (2nd𝑉) = 𝐻)
4438, 43eqtrd 2768 . . . . . . . 8 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (2nd𝑏) = 𝐻)
4536, 44oveq12d 7373 . . . . . . 7 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → ((1st𝑎) · (2nd𝑏)) = (𝐸 · 𝐻))
4637fveq2d 6835 . . . . . . . . 9 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (1st𝑏) = (1st𝑉))
476fveq2d 6835 . . . . . . . . . . 11 (𝜑 → (1st𝑉) = (1st ‘⟨𝐹, 𝐻⟩))
48 op1stg 7942 . . . . . . . . . . . 12 ((𝐹𝐵𝐻𝑆) → (1st ‘⟨𝐹, 𝐻⟩) = 𝐹)
497, 8, 48syl2anc 584 . . . . . . . . . . 11 (𝜑 → (1st ‘⟨𝐹, 𝐻⟩) = 𝐹)
5047, 49eqtrd 2768 . . . . . . . . . 10 (𝜑 → (1st𝑉) = 𝐹)
5150adantr 480 . . . . . . . . 9 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (1st𝑉) = 𝐹)
5246, 51eqtrd 2768 . . . . . . . 8 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (1st𝑏) = 𝐹)
5329fveq2d 6835 . . . . . . . . 9 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (2nd𝑎) = (2nd𝑈))
541fveq2d 6835 . . . . . . . . . . 11 (𝜑 → (2nd𝑈) = (2nd ‘⟨𝐸, 𝐺⟩))
55 op2ndg 7943 . . . . . . . . . . . 12 ((𝐸𝐵𝐺𝑆) → (2nd ‘⟨𝐸, 𝐺⟩) = 𝐺)
562, 3, 55syl2anc 584 . . . . . . . . . . 11 (𝜑 → (2nd ‘⟨𝐸, 𝐺⟩) = 𝐺)
5754, 56eqtrd 2768 . . . . . . . . . 10 (𝜑 → (2nd𝑈) = 𝐺)
5857adantr 480 . . . . . . . . 9 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (2nd𝑈) = 𝐺)
5953, 58eqtrd 2768 . . . . . . . 8 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (2nd𝑎) = 𝐺)
6052, 59oveq12d 7373 . . . . . . 7 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → ((1st𝑏) · (2nd𝑎)) = (𝐹 · 𝐺))
6145, 60oveq12d 7373 . . . . . 6 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (((1st𝑎) · (2nd𝑏)) ((1st𝑏) · (2nd𝑎))) = ((𝐸 · 𝐻) (𝐹 · 𝐺)))
6261oveq2d 7371 . . . . 5 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (𝑡 · (((1st𝑎) · (2nd𝑏)) ((1st𝑏) · (2nd𝑎)))) = (𝑡 · ((𝐸 · 𝐻) (𝐹 · 𝐺))))
6362eqeq1d 2735 . . . 4 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → ((𝑡 · (((1st𝑎) · (2nd𝑏)) ((1st𝑏) · (2nd𝑎)))) = 0 ↔ (𝑡 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = 0 ))
6463rexbidv 3157 . . 3 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (∃𝑡𝑆 (𝑡 · (((1st𝑎) · (2nd𝑏)) ((1st𝑏) · (2nd𝑎)))) = 0 ↔ ∃𝑡𝑆 (𝑡 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = 0 ))
6528, 64brab2d 32609 . 2 (𝜑 → (𝑈 𝑉 ↔ ((𝑈 ∈ (𝐵 × 𝑆) ∧ 𝑉 ∈ (𝐵 × 𝑆)) ∧ ∃𝑡𝑆 (𝑡 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = 0 )))
6618, 65mpbird 257 1 (𝜑𝑈 𝑉)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 395   = wceq 1541  wcel 2113  wrex 3057  wss 3898  cop 4583   class class class wbr 5095  {copab 5157   × cxp 5619  cfv 6489  (class class class)co 7355  1st c1st 7928  2nd c2nd 7929  Basecbs 17127  .rcmulr 17169  0gc0g 17350  -gcsg 18856   ~RL cerl 33263
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2115  ax-9 2123  ax-10 2146  ax-11 2162  ax-12 2182  ax-ext 2705  ax-sep 5238  ax-nul 5248  ax-pow 5307  ax-pr 5374  ax-un 7677
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2537  df-eu 2566  df-clab 2712  df-cleq 2725  df-clel 2808  df-nfc 2882  df-ne 2930  df-ral 3049  df-rex 3058  df-rab 3397  df-v 3439  df-sbc 3738  df-csb 3847  df-dif 3901  df-un 3903  df-in 3905  df-ss 3915  df-nul 4283  df-if 4477  df-pw 4553  df-sn 4578  df-pr 4580  df-op 4584  df-uni 4861  df-br 5096  df-opab 5158  df-mpt 5177  df-id 5516  df-xp 5627  df-rel 5628  df-cnv 5629  df-co 5630  df-dm 5631  df-rn 5632  df-iota 6445  df-fun 6491  df-fv 6497  df-ov 7358  df-oprab 7359  df-mpo 7360  df-1st 7930  df-2nd 7931  df-erl 33265
This theorem is referenced by:  erlbr2d  33274  erler  33275  rlocaddval  33278  rlocmulval  33279  rloccring  33280
  Copyright terms: Public domain W3C validator